home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: MacOS Resource Fork
(archive/rsrc).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| MacOS Resource Fork (archive/rsrc)
| magic
| Supported |
| 10%
| dexvert
| Jesper Olsen Module (music/jesperOlsen)
| magic
| Supported |
| 1%
| dexvert
| BeOS Resource Data (archive/beOSResourceData)
| ext
| Unsupported |
| 1%
| dexvert
| AppleSingle (archive/appleSingle)
| fallback
| Supported |
| 1%
| dexvert
| TTComp Archive (archive/ttcomp)
| fallback
| Supported |
| 100%
| file
| AppleDouble encoded Macintosh file
| default
| |
| 99%
| file
| data
| default
| |
| 66%
| TrID
| Mac AppleDouble encoded
| default
| |
| 33%
| TrID
| TTComp archive compressed (bin-2K)
| default (weak)
| |
| 100%
| lsar
| AppleSingle
| default
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [clpt] |
| macFileCreator | [drag] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 05 16 07 00 02 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 02 00 00 00 09 00 00 |........|........|
|00000020| 00 32 00 00 00 20 00 00 | 00 02 00 00 00 52 00 00 |.2... ..|.....R..|
|00000030| 5e f7 63 6c 70 74 64 72 | 61 67 01 00 00 00 00 00 |^.clptdr|ag......|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 01 00 00 00 | 5e 61 00 00 5d 61 00 00 |........|^a..]a..|
|00000060| 00 96 2a 16 05 05 05 05 | 05 05 16 7f 2a 2a fe 54 |..*.....|....**.T|
|00000070| 2a 7f fb ff fd f6 54 54 | 54 54 54 f8 f5 2a 2a 2a |*.....TT|TTT..***|
|00000080| fe 54 0f 54 68 65 20 53 | 6f 75 72 63 65 20 43 6f |.T.The S|ource Co|
|00000090| 64 65 61 6e 65 6c 30 2e | 31 20 c4 6e 20 61 70 70 |deanel0.|1 .n app|
|000000a0| 3f 53 00 00 63 6c 70 74 | 64 72 61 67 01 00 00 07 |?S..clpt|drag....|
|000000b0| 01 18 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 b2 e2 83 c8 | 00 00 00 00 00 00 5e f7 |........|......^.|
|000000d0| 2a 7f fb ff fd f6 73 54 | 73 54 54 f8 f5 2a 2a 2a |*.....sT|sTT..***|
|000000e0| 2a fe 54 2a 2a 2a 7f 7f | 7f 7f 2a 2a fe 54 2a 2a |*.T***..|..**.T**|
|000000f0| 2a 7f fb ff fd f6 73 2a | 73 2a 2a f8 f5 2a 2a 2a |*.....s*|s**..***|
|00000100| 2a 2a 54 2a 2a 2a 2a 2a | 2a 2a 2a 2a 54 2a 2a 2a |**T*****|****T***|
|00000110| 2a 7f fb ff fd f6 73 73 | 73 73 73 f8 f5 2a 2a 2a |*.....ss|sss..***|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000130| 2a 7f fb ff fd f6 54 54 | 54 54 54 f8 2a 2a 2a 2a |*.....TT|TTT.****|
|00000140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000150| 2a 7f 00 00 5c 97 2f 2f | 20 41 4b 55 41 20 50 72 |*...\.//| AKUA Pr|
|00000160| 6f 74 6f 73 20 4f 6e 65 | 46 69 6c 65 0d 23 69 6e |otos One|File.#in|
|00000170| 63 6c 75 64 65 20 20 20 | 20 22 79 4c 69 62 43 66 |clude | "yLibCf|
|00000180| 67 2e 68 22 0d 0d 23 69 | 6e 63 6c 75 64 65 20 20 |g.h"..#i|nclude |
|00000190| 20 20 22 52 65 61 70 65 | 72 2e 68 22 0d 0d 23 69 | "Reape|r.h"..#i|
|000001a0| 6e 63 6c 75 64 65 20 20 | 20 20 22 79 41 67 74 49 |nclude | "yAgtI|
|000001b0| 4e 49 54 2e 68 22 0d 23 | 69 6e 63 6c 75 64 65 20 |NIT.h".#|include |
|000001c0| 20 20 20 22 79 41 67 74 | 54 52 41 50 2e 68 22 0d | "yAgt|TRAP.h".|
|000001d0| 23 69 6e 63 6c 75 64 65 | 20 20 20 20 22 79 44 72 |#include| "yDr|
|000001e0| 61 77 2e 68 22 0d 23 69 | 6e 63 6c 75 64 65 20 20 |aw.h".#i|nclude |
|000001f0| 20 20 22 79 46 69 78 65 | 64 4d 61 74 68 2e 68 22 | "yFixe|dMath.h"|
|00000200| 0d 23 69 6e 63 6c 75 64 | 65 20 20 20 20 22 79 47 |.#includ|e "yG|
|00000210| 6c 6f 62 61 6c 2e 68 22 | 0d 23 69 6e 63 6c 75 64 |lobal.h"|.#includ|
|00000220| 65 20 20 20 20 22 79 53 | 74 72 69 6e 67 2e 68 22 |e "yS|tring.h"|
|00000230| 0d 0d 23 69 6e 63 6c 75 | 64 65 20 20 20 20 3c 41 |..#inclu|de <A|
|00000240| 70 70 65 61 72 61 6e 63 | 65 2e 68 3e 0d 0d 0d 0d |ppearanc|e.h>....|
|00000250| 2f 2f 0d 2f 2f 20 46 6f | 72 20 50 50 43 20 43 6f |//.// Fo|r PPC Co|
|00000260| 64 65 20 72 65 73 6f 75 | 72 63 65 0d 23 69 66 20 |de resou|rce.#if |
|00000270| 20 20 20 20 20 20 20 20 | 49 53 41 50 50 43 0d 50 | |ISAPPC.P|
|00000280| 72 6f 63 49 6e 66 6f 54 | 79 70 65 20 20 20 20 5f |rocInfoT|ype _|
|00000290| 5f 70 72 6f 63 69 6e 66 | 6f 20 3d 20 62 70 69 4f |_procinf|o = bpiO|
|000002a0| 62 6a 41 67 74 3b 0d 23 | 65 6e 64 69 66 20 20 2f |bjAgt;.#|endif /|
|000002b0| 2f 20 20 49 53 41 50 50 | 43 0d 0d 0d 2f 2f 20 41 |/ ISAPP|C...// A|
|000002c0| 4b 55 41 20 53 74 61 74 | 69 63 73 20 42 65 67 0d |KUA Stat|ics Beg.|
|000002d0| 6f 61 56 61 6c 20 6d 61 | 69 6e 28 6f 61 4f 62 6a |oaVal ma|in(oaObj|
|000002e0| 20 69 6e 69 74 42 6c 6b | 4f 62 6a 29 3b 0d 73 74 | initBlk|Obj);.st|
|000002f0| 61 74 69 63 20 53 79 73 | 50 72 6f 63 20 74 70 4c |atic Sys|Proc tpL|
|00000300| 61 75 6e 63 68 58 28 4c | 61 75 6e 63 68 50 42 50 |aunchX(L|aunchPBP|
|00000310| 74 72 20 70 62 2c 20 4f | 53 45 72 72 20 2a 20 65 |tr pb, O|SErr * e|
|00000320| 72 72 29 3b 0d 23 69 66 | 20 20 20 20 20 20 20 20 |rr);.#if| |
|00000330| 20 49 53 41 50 50 43 0d | 73 74 61 74 69 63 20 70 | ISAPPC.|static p|
|00000340| 61 73 63 61 6c 20 4f 53 | 45 72 72 20 78 61 4c 61 |ascal OS|Err xaLa|
|00000350| 75 6e 63 68 50 50 43 28 | 4c 61 75 6e 63 68 50 42 |unchPPC(|LaunchPB|
|00000360| 50 74 72 20 70 62 29 3b | 0d 23 65 6c 73 65 20 20 |Ptr pb);|.#else |
|00000370| 20 2f 2f 20 20 49 53 41 | 50 50 43 0d 73 74 61 74 | // ISA|PPC.stat|
|00000380| 69 63 20 70 61 73 63 61 | 6c 20 61 73 6d 20 4f 53 |ic pasca|l asm OS|
|00000390| 45 72 72 20 78 61 4c 61 | 75 6e 63 68 28 76 6f 69 |Err xaLa|unch(voi|
|000003a0| 64 29 3b 0d 23 65 6e 64 | 69 66 20 20 2f 2f 20 20 |d);.#end|if // |
|000003b0| 49 53 41 50 50 43 0d 73 | 74 61 74 69 63 20 53 79 |ISAPPC.s|tatic Sy|
|000003c0| 73 50 72 6f 63 20 74 70 | 47 65 74 31 52 65 73 6f |sProc tp|Get1Reso|
|000003d0| 75 72 63 65 58 28 69 64 | 65 6e 74 20 6b 69 6e 64 |urceX(id|ent kind|
|000003e0| 2c 20 73 68 6f 72 74 20 | 72 65 73 4e 75 6d 2c 20 |, short |resNum, |
|000003f0| 48 61 6e 64 6c 65 20 2a | 20 72 65 74 48 64 6c 29 |Handle *| retHdl)|
|00000400| 3b 0d 23 69 66 20 20 20 | 20 20 20 20 20 20 49 53 |;.#if | IS|
|00000410| 41 50 50 43 0d 73 74 61 | 74 69 63 20 70 61 73 63 |APPC.sta|tic pasc|
|00000420| 61 6c 20 48 61 6e 64 6c | 65 20 78 61 47 65 74 31 |al Handl|e xaGet1|
|00000430| 52 65 73 6f 75 72 63 65 | 50 50 43 28 52 65 73 54 |Resource|PPC(ResT|
|00000440| 79 70 65 20 6b 69 6e 64 | 2c 20 73 68 6f 72 74 20 |ype kind|, short |
|00000450| 72 65 73 4e 75 6d 29 3b | 0d 23 65 6c 73 65 20 20 |resNum);|.#else |
|00000460| 20 2f 2f 20 20 49 53 41 | 50 50 43 0d 73 74 61 74 | // ISA|PPC.stat|
|00000470| 69 63 20 70 61 73 63 61 | 6c 20 61 73 6d 20 48 61 |ic pasca|l asm Ha|
|00000480| 6e 64 6c 65 20 78 61 47 | 65 74 31 52 65 73 6f 75 |ndle xaG|et1Resou|
|00000490| 72 63 65 28 52 65 73 54 | 79 70 65 20 6b 69 6e 64 |rce(ResT|ype kind|
|000004a0| 2c 20 73 68 6f 72 74 20 | 72 65 73 49 44 29 3b 0d |, short |resID);.|
|000004b0| 23 65 6e 64 69 66 20 20 | 2f 2f 20 20 49 53 41 50 |#endif |// ISAP|
|000004c0| 50 43 0d 73 74 61 74 69 | 63 20 48 61 6e 64 6c 65 |PC.stati|c Handle|
|000004d0| 20 74 70 4e 65 77 48 61 | 6e 64 6c 65 58 28 77 6f | tpNewHa|ndleX(wo|
|000004e0| 72 64 20 74 77 2c 20 53 | 69 7a 65 20 61 6d 74 29 |rd tw, S|ize amt)|
|000004f0| 3b 0d 23 69 66 20 20 20 | 20 20 20 20 20 20 49 53 |;.#if | IS|
|00000500| 41 50 50 43 0d 73 74 61 | 74 69 63 20 70 61 73 63 |APPC.sta|tic pasc|
|00000510| 61 6c 20 48 61 6e 64 6c | 65 20 78 61 4e 65 77 48 |al Handl|e xaNewH|
|00000520| 61 6e 64 6c 65 50 50 43 | 28 77 6f 72 64 20 74 77 |andlePPC|(word tw|
|00000530| 2c 20 53 69 7a 65 20 61 | 6d 74 29 3b 0d 73 74 61 |, Size a|mt);.sta|
|00000540| 74 69 63 20 70 61 73 63 | 61 6c 20 48 61 6e 64 6c |tic pasc|al Handl|
|00000550| 65 20 78 61 4e 65 77 48 | 61 6e 64 6c 65 53 6d 61 |e xaNewH|andleSma|
|00000560| 72 74 50 50 43 28 77 6f | 72 64 20 74 77 2c 20 53 |rtPPC(wo|rd tw, S|
|00000570| 69 7a 65 20 61 6d 74 29 | 3b 0d 23 65 6c 73 65 20 |ize amt)|;.#else |
|00000580| 20 20 2f 2f 20 20 49 53 | 41 50 50 43 0d 73 74 61 | // IS|APPC.sta|
|00000590| 74 69 63 20 70 61 73 63 | 61 6c 20 61 73 6d 20 76 |tic pasc|al asm v|
|000005a0| 6f 69 64 20 78 61 4e 65 | 77 48 61 6e 64 6c 65 28 |oid xaNe|wHandle(|
|000005b0| 76 6f 69 64 29 3b 0d 73 | 74 61 74 69 63 20 70 61 |void);.s|tatic pa|
|000005c0| 73 63 61 6c 20 61 73 6d | 20 76 6f 69 64 20 78 61 |scal asm| void xa|
|000005d0| 4e 65 77 48 61 6e 64 6c | 65 53 6d 61 72 74 28 76 |NewHandl|eSmart(v|
|000005e0| 6f 69 64 29 3b 0d 23 65 | 6e 64 69 66 20 20 2f 2f |oid);.#e|ndif //|
|000005f0| 20 20 49 53 41 50 50 43 | 0d 73 74 61 74 69 63 20 | ISAPPC|.static |
|00000600| 50 74 72 20 74 70 4e 65 | 77 50 74 72 58 28 77 6f |Ptr tpNe|wPtrX(wo|
|00000610| 72 64 20 74 77 2c 20 53 | 69 7a 65 20 61 6d 74 29 |rd tw, S|ize amt)|
|00000620| 3b 0d 23 69 66 20 20 20 | 20 20 49 53 41 50 50 43 |;.#if | ISAPPC|
|00000630| 0d 73 74 61 74 69 63 20 | 70 61 73 63 61 6c 20 50 |.static |pascal P|
|00000640| 74 72 20 78 61 4e 65 77 | 50 74 72 50 50 43 28 77 |tr xaNew|PtrPPC(w|
|00000650| 6f 72 64 20 74 77 2c 20 | 53 69 7a 65 20 61 6d 74 |ord tw, |Size amt|
|00000660| 29 3b 0d 23 65 6c 73 65 | 0d 73 74 61 74 69 63 20 |);.#else|.static |
|00000670| 70 61 73 63 61 6c 20 61 | 73 6d 20 76 6f 69 64 20 |pascal a|sm void |
|00000680| 78 61 4e 65 77 50 74 72 | 28 76 6f 69 64 29 3b 0d |xaNewPtr|(void);.|
|00000690| 23 65 6e 64 69 66 20 20 | 2f 2f 20 20 49 53 41 50 |#endif |// ISAP|
|000006a0| 50 43 0d 73 74 61 74 69 | 63 20 53 79 73 50 72 6f |PC.stati|c SysPro|
|000006b0| 63 20 74 70 44 69 73 70 | 6f 73 65 50 74 72 58 28 |c tpDisp|osePtrX(|
|000006c0| 77 6f 72 64 20 74 77 2c | 20 50 74 72 20 70 29 3b |word tw,| Ptr p);|
|000006d0| 0d 23 69 66 20 20 20 20 | 20 20 20 20 20 49 53 41 |.#if | ISA|
|000006e0| 50 50 43 0d 73 74 61 74 | 69 63 20 70 61 73 63 61 |PPC.stat|ic pasca|
|000006f0| 6c 20 76 6f 69 64 20 78 | 61 44 69 73 70 6f 73 65 |l void x|aDispose|
|00000700| 50 74 72 50 50 43 28 77 | 6f 72 64 20 74 77 2c 20 |PtrPPC(w|ord tw, |
|00000710| 50 74 72 20 70 29 3b 0d | 23 65 6c 73 65 20 20 20 |Ptr p);.|#else |
|00000720| 2f 2f 20 20 49 53 41 50 | 50 43 0d 73 74 61 74 69 |// ISAP|PC.stati|
|00000730| 63 20 70 61 73 63 61 6c | 20 61 73 6d 20 76 6f 69 |c pascal| asm voi|
|00000740| 64 20 78 61 44 69 73 70 | 6f 73 65 50 74 72 28 76 |d xaDisp|osePtr(v|
|00000750| 6f 69 64 29 3b 0d 23 65 | 6e 64 69 66 20 20 2f 2f |oid);.#e|ndif //|
|00000760| 20 20 49 53 41 50 50 43 | 0d 73 74 61 74 69 63 20 | ISAPPC|.static |
|00000770| 53 79 73 50 72 6f 63 20 | 74 70 4d 61 78 41 70 70 |SysProc |tpMaxApp|
|00000780| 6c 5a 6f 6e 65 58 28 76 | 6f 69 64 29 3b 0d 23 69 |lZoneX(v|oid);.#i|
|00000790| 66 20 20 20 20 20 20 20 | 20 20 49 53 41 50 50 43 |f | ISAPPC|
|000007a0| 0d 73 74 61 74 69 63 20 | 70 61 73 63 61 6c 20 76 |.static |pascal v|
|000007b0| 6f 69 64 20 78 61 4d 61 | 78 41 70 70 6c 5a 6f 6e |oid xaMa|xApplZon|
|000007c0| 65 50 50 43 28 76 6f 69 | 64 29 3b 0d 23 65 6c 73 |ePPC(voi|d);.#els|
|000007d0| 65 20 20 20 2f 2f 20 20 | 49 53 41 50 50 43 0d 73 |e // |ISAPPC.s|
|000007e0| 74 61 74 69 63 20 70 61 | 73 63 61 6c 20 61 73 6d |tatic pa|scal asm|
|000007f0| 20 76 6f 69 64 20 78 61 | 4d 61 78 41 70 70 6c 5a | void xa|MaxApplZ|
|00000800| 6f 6e 65 28 76 6f 69 64 | 29 3b 0d 23 65 6e 64 69 |one(void|);.#endi|
|00000810| 66 20 20 2f 2f 20 20 49 | 53 41 50 50 43 0d 73 74 |f // I|SAPPC.st|
|00000820| 61 74 69 63 20 50 69 63 | 48 61 6e 64 6c 65 20 74 |atic Pic|Handle t|
|00000830| 70 4f 70 65 6e 50 69 63 | 74 75 72 65 58 28 72 65 |pOpenPic|tureX(re|
|00000840| 63 74 20 62 6f 78 29 3b | 0d 23 69 66 20 20 20 20 |ct box);|.#if |
|00000850| 20 20 20 20 20 49 53 41 | 50 50 43 0d 73 74 61 74 | ISA|PPC.stat|
|00000860| 69 63 20 70 61 73 63 61 | 6c 20 50 69 63 48 61 6e |ic pasca|l PicHan|
|00000870| 64 6c 65 20 78 61 4f 70 | 65 6e 50 69 63 74 75 72 |dle xaOp|enPictur|
|00000880| 65 50 50 43 28 72 65 63 | 74 20 62 6f 78 29 3b 0d |ePPC(rec|t box);.|
|00000890| 23 65 6c 73 65 20 20 20 | 2f 2f 20 20 49 53 41 50 |#else |// ISAP|
|000008a0| 50 43 0d 73 74 61 74 69 | 63 20 70 61 73 63 61 6c |PC.stati|c pascal|
|000008b0| 20 61 73 6d 20 76 6f 69 | 64 20 78 61 4f 70 65 6e | asm voi|d xaOpen|
|000008c0| 50 69 63 74 75 72 65 28 | 76 6f 69 64 29 3b 0d 23 |Picture(|void);.#|
|000008d0| 65 6e 64 69 66 20 20 2f | 2f 20 20 49 53 41 50 50 |endif /|/ ISAPP|
|000008e0| 43 0d 79 45 72 72 6f 72 | 20 74 70 49 6e 69 74 28 |C.yError| tpInit(|
|000008f0| 69 6e 69 74 42 6c 6b 20 | 69 6e 69 74 29 3b 0d 53 |initBlk |init);.S|
|00000900| 79 73 50 72 6f 63 20 6f | 73 54 72 61 70 53 77 61 |ysProc o|sTrapSwa|
|00000910| 70 28 77 6f 72 64 20 74 | 72 61 70 57 6f 72 64 2c |p(word t|rapWord,|
|00000920| 20 76 6f 69 64 20 2a 20 | 6e 65 77 54 72 61 70 41 | void * |newTrapA|
|00000930| 64 72 29 3b 0d 2f 2f 20 | 41 4b 55 41 20 53 74 61 |dr);.// |AKUA Sta|
|00000940| 74 69 63 73 20 45 6e 64 | 0d 0d 0d 0d 0d 65 6e 75 |tics End|.....enu|
|00000950| 6d 20 54 72 61 70 52 65 | 70 6c 61 63 65 6d 65 6e |m TrapRe|placemen|
|00000960| 74 0d 20 7b 0d 20 20 20 | 20 6b 74 72 4c 61 75 6e |t. {. | ktrLaun|
|00000970| 63 68 2c 0d 20 20 20 20 | 6b 74 72 47 65 74 31 52 |ch,. |ktrGet1R|
|00000980| 65 73 6f 75 72 63 65 2c | 0d 20 20 20 20 6b 74 72 |esource,|. ktr|
|00000990| 4d 61 78 41 70 70 6c 5a | 6f 6e 65 2c 0d 0d 20 20 |MaxApplZ|one,.. |
|000009a0| 20 20 6b 74 72 4f 70 65 | 6e 50 69 63 74 75 72 65 | ktrOpe|nPicture|
|000009b0| 2c 20 20 20 20 20 2f 2f | 20 4f 6e 6c 79 20 73 65 |, //| Only se|
|000009c0| 74 20 61 74 20 4d 61 78 | 41 70 70 6c 5a 6f 6e 65 |t at Max|ApplZone|
|000009d0| 0d 20 20 20 20 6b 74 72 | 4e 65 77 48 61 6e 64 6c |. ktr|NewHandl|
|000009e0| 65 2c 0d 2f 2f 20 20 6b | 74 72 53 65 74 48 61 6e |e,.// k|trSetHan|
|000009f0| 64 6c 65 53 69 7a 65 2c | 0d 20 20 20 20 6b 74 72 |dleSize,|. ktr|
|00000a00| 4e 65 77 50 74 72 2c 0d | 20 20 20 20 6b 74 72 44 |NewPtr,.| ktrD|
|00000a10| 69 73 70 6f 73 65 50 74 | 72 2c 0d 0d 20 20 20 20 |isposePt|r,.. |
|00000a20| 6b 74 72 43 6e 74 0d 20 | 7d 3b 0d 0d 0d 2f 2f 20 |ktrCnt. |};...// |
|00000a30| 4f 75 72 20 67 6c 6f 62 | 61 6c 73 0d 52 65 61 70 |Our glob|als.Reap|
|00000a40| 65 72 47 6c 6f 20 20 20 | 67 72 70 20 3d 0d 20 7b |erGlo |grp =. {|
|00000a50| 0d 20 20 20 20 69 67 73 | 52 65 61 70 65 72 2c 0d |. igs|Reaper,.|
|00000a60| 20 20 20 20 6b 76 72 52 | 65 61 70 65 72 43 75 72 | kvrR|eaperCur|
|00000a70| 72 65 6e 74 2c 0d 20 20 | 20 20 30 2c 0d 20 20 20 |rent,. | 0,. |
|00000a80| 20 4e 55 4c 4c 0d 20 7d | 3b 0d 0d 4d 6f 6e 6b 65 | NULL. }|;..Monke|
|00000a90| 79 46 6c 61 67 20 20 74 | 68 65 4d 6f 6e 6b 65 79 |yFlag t|heMonkey|
|00000aa0| 3b 0d 53 79 73 50 72 6f | 63 20 20 20 20 20 67 61 |;.SysPro|c ga|
|00000ab0| 74 54 72 61 70 73 5b 6b | 74 72 43 6e 74 5d 3b 0d |tTraps[k|trCnt];.|
|00000ac0| 2f 2f 20 45 6e 64 20 67 | 6c 6f 62 61 6c 73 0d 0d |// End g|lobals..|
|00000ad0| 0d 0d 0d 0d 0d 6f 61 56 | 61 6c 20 6d 61 69 6e 28 |.....oaV|al main(|
|00000ae0| 6f 61 4f 62 6a 20 69 6e | 69 74 42 6c 6b 4f 62 6a |oaObj in|itBlkObj|
|00000af0| 29 20 0d 20 7b 0d 20 20 | 20 20 45 6e 74 65 72 43 |) . {. | EnterC|
|00000b00| 6f 64 65 52 73 72 63 28 | 29 3b 0d 0d 20 20 20 20 |odeRsrc(|);.. |
|00000b10| 69 6e 69 74 42 6c 6b 20 | 20 20 20 20 69 6e 69 74 |initBlk | init|
|00000b20| 20 3d 20 28 69 6e 69 74 | 42 6c 6b 29 69 6e 69 74 | = (init|Blk)init|
|00000b30| 42 6c 6b 4f 62 6a 3b 0d | 0d 20 20 20 20 2f 2f 20 |BlkObj;.|. // |
|00000b40| 62 6b 6b 45 74 65 72 6e | 61 6c 20 2d 20 73 69 6e |bkkEtern|al - sin|
|00000b50| 63 65 20 77 65 20 73 74 | 61 79 20 72 65 73 69 64 |ce we st|ay resid|
|00000b60| 65 6e 74 2c 20 6c 6f 61 | 64 20 61 6e 64 20 64 65 |ent, loa|d and de|
|00000b70| 74 61 63 68 20 27 50 52 | 45 46 27 20 72 65 73 6f |tach 'PR|EF' reso|
|00000b80| 75 72 63 65 0d 20 20 20 | 20 69 6e 69 74 2d 3e 66 |urce. | init->f|
|00000b90| 6c 61 67 73 20 3d 20 62 | 6b 6b 45 74 65 72 6e 61 |lags = b|kkEterna|
|00000ba0| 6c 3b 0d 0d 20 20 20 20 | 2f 2f 20 47 6c 6f 62 61 |l;.. |// Globa|
|00000bb0| 6c 20 49 6e 69 74 69 61 | 6c 69 7a 61 74 69 6f 6e |l Initia|lization|
|00000bc0| 0d 20 20 20 20 74 68 65 | 4d 6f 6e 6b 65 79 20 3d |. the|Monkey =|
|00000bd0| 20 62 45 76 4d 6f 6e 6b | 65 79 4c 69 76 65 73 20 | bEvMonk|eyLives |
|00000be0| 7c 20 28 69 6e 69 74 2d | 3e 6d 6f 6e 6b 65 79 20 || (init-|>monkey |
|00000bf0| 26 20 28 62 45 76 4d 6f | 6e 6b 65 79 50 6f 77 65 |& (bEvMo|nkeyPowe|
|00000c00| 72 65 64 20 7c 20 62 45 | 76 4d 6f 6e 6b 65 79 48 |red | bE|vMonkeyH|
|00000c10| 61 73 43 6f 6c 6f 75 72 | 51 44 20 7c 20 62 45 76 |asColour|QD | bEv|
|00000c20| 4d 6f 6e 6b 65 79 55 73 | 65 43 6f 6c 6f 75 72 51 |MonkeyUs|eColourQ|
|00000c30| 44 29 29 3b 0d 0d 20 20 | 20 20 67 72 70 2e 70 72 |D));.. | grp.pr|
|00000c40| 65 66 73 20 3d 20 28 42 | 41 44 41 50 50 29 69 6e |efs = (B|ADAPP)in|
|00000c50| 69 74 2d 3e 70 72 65 66 | 73 3b 0d 0d 20 20 20 20 |it->pref|s;.. |
|00000c60| 2f 2f 20 53 65 74 20 75 | 70 20 74 72 61 70 73 0d |// Set u|p traps.|
|00000c70| 20 20 20 20 79 45 72 72 | 6f 72 20 65 72 72 20 3d | yErr|or err =|
|00000c80| 20 74 70 49 6e 69 74 28 | 69 6e 69 74 29 3b 20 20 | tpInit(|init); |
|00000c90| 20 20 20 20 2f 2f 20 49 | 6e 69 74 20 47 65 73 74 | // I|nit Gest|
|00000ca0| 61 6c 74 20 45 6e 74 72 | 69 65 73 0d 0d 20 20 20 |alt Entr|ies.. |
|00000cb0| 20 2f 2f 20 53 68 6f 77 | 20 6f 75 72 20 69 63 6f | // Show| our ico|
|00000cc0| 6e 2c 20 67 65 74 20 70 | 72 65 66 73 0d 20 20 20 |n, get p|refs. |
|00000cd0| 20 43 61 6c 6c 4f 62 6a | 41 67 74 28 69 6e 69 74 | CallObj|Agt(init|
|00000ce0| 2d 3e 6b 69 63 6b 41 67 | 74 2c 20 69 6e 69 74 29 |->kickAg|t, init)|
|00000cf0| 3b 0d 0d 64 65 61 64 6c | 79 45 72 72 6f 72 3a 0d |;..deadl|yError:.|
|00000d00| 20 20 20 20 4c 65 61 76 | 65 43 6f 64 65 52 73 72 | Leav|eCodeRsr|
|00000d10| 63 28 29 3b 0d 0d 20 20 | 20 20 72 65 74 75 72 6e |c();.. | return|
|00000d20| 20 20 65 72 72 3b 0d 20 | 7d 0d 0d 0d 0d 0d 73 74 | err;. |}.....st|
|00000d30| 61 74 69 63 20 53 79 73 | 50 72 6f 63 20 74 70 4c |atic Sys|Proc tpL|
|00000d40| 61 75 6e 63 68 58 28 4c | 61 75 6e 63 68 50 42 50 |aunchX(L|aunchPBP|
|00000d50| 74 72 20 70 62 2c 20 4f | 53 45 72 72 20 2a 20 65 |tr pb, O|SErr * e|
|00000d60| 72 72 29 0d 20 7b 0d 20 | 2f 2a 20 d0 d0 d0 d0 d0 |rr). {. |/* .....|
|00000d70| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00000d80| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00000d90| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00000da0| d0 d0 d0 d0 d0 0d 20 20 | 20 20 74 70 20 20 20 20 |...... | tp |
|00000db0| 20 20 4c 61 75 6e 63 68 | 58 0d 20 20 20 20 0d 20 | Launch|X. . |
|00000dc0| 20 20 20 49 6e 20 20 20 | 20 20 20 0d 20 20 20 20 | In | . |
|00000dd0| 4f 75 74 20 20 20 20 20 | 0d 0d 20 20 20 20 45 66 |Out |.. Ef|
|00000de0| 66 65 63 74 20 20 47 72 | 61 62 20 65 76 65 6e 74 |fect Gr|ab event|
|00000df0| 73 2c 20 63 68 65 63 6b | 20 27 65 6d 20 6f 75 74 |s, check| 'em out|
|00000e00| 2c 20 61 6e 64 20 70 61 | 73 73 20 27 65 6d 20 6f |, and pa|ss 'em o|
|00000e10| 6e c9 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 28 |n.. | (|
|00000e20| 4b 65 65 70 20 74 72 61 | 63 6b 20 6f 66 20 69 64 |Keep tra|ck of id|
|00000e30| 6c 65 20 66 6f 72 20 41 | 75 74 6f 4f 4b 20 66 75 |le for A|utoOK fu|
|00000e40| 6e 63 74 69 6f 6e 20 61 | 6e 64 0d 20 20 20 20 20 |nction a|nd. |
|00000e50| 20 20 20 20 20 20 20 20 | 70 6f 70 2d 75 70 20 75 | |pop-up u|
|00000e60| 74 69 6c 69 74 79 20 6d | 65 6e 75 73 20 77 68 65 |tility m|enus whe|
|00000e70| 6e 20 74 68 65 20 75 73 | 65 72 20 68 61 73 20 63 |n the us|er has c|
|00000e80| 68 6f 73 65 6e 20 74 68 | 65 6d 29 2e 0d 0d 20 20 |hosen th|em)... |
|00000e90| 20 20 43 6f 6e 73 74 20 | 20 20 0d 20 20 20 20 45 | Const | . E|
|00000ea0| 72 72 6f 72 73 20 20 0d | 20 20 20 20 46 6c 61 67 |rrors .| Flag|
|00000eb0| 73 20 20 20 0d 20 20 20 | 20 47 6c 6f 62 61 6c 20 |s . | Global |
|00000ec0| 20 0d 20 20 20 20 52 73 | 72 63 20 20 20 20 0d 0d | . Rs|rc ..|
|00000ed0| 20 20 20 20 56 65 72 73 | 69 6f 6e 20 30 30 31 0d | Vers|ion 001.|
|00000ee0| 20 20 20 20 4e 6f 74 65 | 73 20 20 20 0d 20 20 20 | Note|s . |
|00000ef0| 20 48 69 73 74 6f 72 79 | 0d 20 20 20 20 30 30 31 | History|. 001|
|00000f00| 20 47 4f 44 20 31 32 2e | 30 37 2e 39 35 20 77 64 | GOD 12.|07.95 wd|
|00000f10| 53 65 6c 65 63 74 20 61 | 63 74 69 6f 6e 20 6d 6f |Select a|ction mo|
|00000f20| 76 65 64 20 68 65 72 65 | 0d 20 20 20 20 20 20 20 |ved here|. |
|00000f30| 20 20 20 20 20 20 41 63 | 74 69 6f 6e 20 6e 6f 77 | Ac|tion now|
|00000f40| 20 69 6e 63 6c 75 64 65 | 73 20 32 20 73 65 63 73 | include|s 2 secs|
|00000f50| 20 6f 72 20 6d 6f 72 65 | 20 6f 66 0d 20 20 20 20 | or more| of. |
|00000f60| 20 20 20 20 20 20 20 20 | 20 65 76 65 6e 74 73 20 | | events |
|00000f70| 6e 6f 74 20 62 65 69 6e | 67 20 70 72 6f 63 65 73 |not bein|g proces|
|00000f80| 73 65 64 2e 0d 20 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |sed.. ..|........|
|00000f90| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00000fa0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00000fb0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00000fc0| d0 20 2a 2f 0d 20 20 20 | 20 45 6e 74 65 72 43 6f |. */. | EnterCo|
|00000fd0| 64 65 52 73 72 63 28 29 | 3b 0d 0d 20 20 20 20 53 |deRsrc()|;.. S|
|00000fe0| 79 73 50 72 6f 63 20 74 | 72 61 70 20 3d 20 67 61 |ysProc t|rap = ga|
|00000ff0| 74 54 72 61 70 73 5b 6b | 74 72 4c 61 75 6e 63 68 |tTraps[k|trLaunch|
|00001000| 5d 3b 0d 0d 20 20 20 20 | 6d 63 4f 62 6a 53 65 74 |];.. |mcObjSet|
|00001010| 28 26 67 72 70 2c 20 62 | 72 70 49 73 4c 61 75 6e |(&grp, b|rpIsLaun|
|00001020| 63 68 69 6e 67 29 3b 0d | 0d 23 69 66 20 20 20 20 |ching);.|.#if |
|00001030| 20 20 20 20 20 49 53 41 | 50 50 43 0d 20 20 20 20 | ISA|PPC. |
|00001040| 2f 2f 20 44 65 62 75 67 | 53 74 72 28 22 5c 70 4c |// Debug|Str("\pL|
|00001050| 61 75 6e 63 68 22 29 3b | 0d 20 20 20 20 2a 65 72 |aunch");|. *er|
|00001060| 72 20 3d 20 43 61 6c 6c | 55 6e 69 76 65 72 73 61 |r = Call|Universa|
|00001070| 6c 50 72 6f 63 28 74 72 | 61 70 2c 20 62 70 69 4c |lProc(tr|ap, bpiL|
|00001080| 61 75 6e 63 68 2c 20 70 | 62 29 3b 0d 23 65 6c 73 |aunch, p|b);.#els|
|00001090| 65 20 20 20 2f 2f 20 20 | 49 53 41 50 50 43 0d 20 |e // |ISAPPC. |
|000010a0| 20 20 20 2a 65 72 72 20 | 3d 20 28 2a 28 74 72 61 | *err |= (*(tra|
|000010b0| 70 4c 61 75 6e 63 68 50 | 72 6f 63 29 74 72 61 70 |pLaunchP|roc)trap|
|000010c0| 29 28 70 62 29 3b 0d 23 | 65 6e 64 69 66 20 20 2f |)(pb);.#|endif /|
|000010d0| 2f 20 20 49 53 41 50 50 | 43 0d 0d 20 20 20 20 6d |/ ISAPP|C.. m|
|000010e0| 63 4f 62 6a 43 6c 72 28 | 26 67 72 70 2c 20 62 72 |cObjClr(|&grp, br|
|000010f0| 70 49 73 4c 61 75 6e 63 | 68 69 6e 67 29 3b 0d 0d |pIsLaunc|hing);..|
|00001100| 20 20 20 20 4c 65 61 76 | 65 43 6f 64 65 52 73 72 | Leav|eCodeRsr|
|00001110| 63 28 29 3b 0d 0d 20 20 | 20 20 2f 2f 20 72 65 74 |c();.. | // ret|
|00001120| 75 72 6e 20 20 20 74 72 | 61 70 3b 0d 20 20 20 20 |urn tr|ap;. |
|00001130| 72 65 74 75 72 6e 20 20 | 20 20 20 20 4e 55 4c 4c |return | NULL|
|00001140| 3b 0d 20 7d 0d 0d 0d 23 | 69 66 20 20 20 20 20 20 |;. }...#|if |
|00001150| 20 20 20 49 53 41 50 50 | 43 0d 0d 73 74 61 74 69 | ISAPP|C..stati|
|00001160| 63 20 53 79 73 50 72 6f | 63 44 65 66 20 78 61 4c |c SysPro|cDef xaL|
|00001170| 61 75 6e 63 68 20 3d 20 | 42 55 49 4c 44 5f 52 4f |aunch = |BUILD_RO|
|00001180| 55 54 49 4e 45 5f 44 45 | 53 43 52 49 50 54 4f 52 |UTINE_DE|SCRIPTOR|
|00001190| 28 62 70 69 4c 61 75 6e | 63 68 2c 20 78 61 4c 61 |(bpiLaun|ch, xaLa|
|000011a0| 75 6e 63 68 50 50 43 29 | 3b 0d 0d 73 74 61 74 69 |unchPPC)|;..stati|
|000011b0| 63 20 70 61 73 63 61 6c | 20 4f 53 45 72 72 20 78 |c pascal| OSErr x|
|000011c0| 61 4c 61 75 6e 63 68 50 | 50 43 28 4c 61 75 6e 63 |aLaunchP|PC(Launc|
|000011d0| 68 50 42 50 74 72 20 70 | 62 29 0d 20 7b 0d 20 20 |hPBPtr p|b). {. |
|000011e0| 20 20 4f 53 45 72 72 20 | 20 20 20 20 20 20 65 72 | OSErr | er|
|000011f0| 72 3b 0d 0d 20 20 20 20 | 69 66 20 28 53 79 73 50 |r;.. |if (SysP|
|00001200| 72 6f 63 20 70 20 3d 20 | 74 70 4c 61 75 6e 63 68 |roc p = |tpLaunch|
|00001210| 58 28 70 62 2c 20 26 65 | 72 72 29 29 0d 20 20 20 |X(pb, &e|rr)). |
|00001220| 20 20 20 20 20 65 72 72 | 20 3d 20 43 61 6c 6c 55 | err| = CallU|
|00001230| 6e 69 76 65 72 73 61 6c | 50 72 6f 63 28 70 2c 20 |niversal|Proc(p, |
|00001240| 62 70 69 4c 61 75 6e 63 | 68 2c 20 70 62 29 3b 0d |bpiLaunc|h, pb);.|
|00001250| 0d 20 20 20 20 72 65 74 | 75 72 6e 20 20 65 72 72 |. ret|urn err|
|00001260| 3b 0d 20 7d 0d 0d 23 65 | 6c 73 65 20 20 20 2f 2f |;. }..#e|lse //|
|00001270| 20 20 49 53 41 50 50 43 | 0d 0d 73 74 61 74 69 63 | ISAPPC|..static|
|00001280| 20 70 61 73 63 61 6c 20 | 61 73 6d 20 4f 53 45 72 | pascal |asm OSEr|
|00001290| 72 20 78 61 4c 61 75 6e | 63 68 28 76 6f 69 64 29 |r xaLaun|ch(void)|
|000012a0| 0d 20 7b 0d 20 20 20 20 | 2f 2f 20 50 61 72 6d 73 |. {. |// Parms|
|000012b0| 20 61 72 65 20 69 6e 20 | 72 65 67 69 73 74 65 72 | are in |register|
|000012c0| 73 21 21 21 20 43 61 72 | 65 66 75 6c 0d 20 20 20 |s!!! Car|eful. |
|000012d0| 20 63 6c 72 2e 6c 20 20 | 20 20 20 20 20 2d 28 73 | clr.l | -(s|
|000012e0| 70 29 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |p) | |
|000012f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001300| 20 2f 2f 20 53 70 61 63 | 65 20 66 6f 72 20 72 65 | // Spac|e for re|
|00001310| 61 6c 20 74 72 61 70 0d | 20 20 20 20 6d 6f 76 65 |al trap.| move|
|00001320| 6d 2e 6c 20 20 20 20 20 | 61 30 2d 61 31 2f 64 30 |m.l |a0-a1/d0|
|00001330| 2d 64 32 2c 20 2d 28 73 | 70 29 0d 0d 20 20 20 20 |-d2, -(s|p).. |
|00001340| 70 65 61 20 20 20 20 20 | 20 20 20 20 34 20 2b 20 |pea | 4 + |
|00001350| 32 30 20 2b 20 34 28 73 | 70 29 20 20 20 20 20 20 |20 + 4(s|p) |
|00001360| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001370| 2f 2f 20 53 70 61 63 65 | 2c 20 52 65 67 73 2c 20 |// Space|, Regs, |
|00001380| 52 54 53 20 41 64 72 65 | 73 73 20 28 74 68 65 20 |RTS Adre|ss (the |
|00001390| 76 61 6c 75 65 20 6f 66 | 20 74 68 69 73 20 61 64 |value of| this ad|
|000013a0| 64 72 65 73 73 20 69 73 | 20 61 6c 73 6f 20 69 6e |dress is| also in|
|000013b0| 20 64 30 29 0d 20 20 20 | 20 6d 6f 76 65 2e 6c 20 | d0). | move.l |
|000013c0| 20 20 20 20 20 61 31 2c | 20 2d 28 73 70 29 20 20 | a1,| -(sp) |
|000013d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000013e0| 20 20 20 20 20 20 20 20 | 20 2f 2f 20 45 76 65 6e | | // Even|
|000013f0| 74 20 52 65 63 6f 72 64 | 20 2a 0d 0d 20 20 20 20 |t Record| *.. |
|00001400| 6a 73 72 20 20 20 20 20 | 20 20 20 20 74 70 4c 61 |jsr | tpLa|
|00001410| 75 6e 63 68 58 0d 20 20 | 20 20 61 64 64 71 2e 77 |unchX. | addq.w|
|00001420| 20 20 20 20 20 20 23 38 | 2c 20 73 70 20 20 20 20 | #8|, sp |
|00001430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001440| 20 20 20 20 20 20 20 20 | 20 20 2f 2f 20 4b 69 6c | | // Kil|
|00001450| 6c 20 70 61 72 6d 73 0d | 0d 20 20 20 20 6d 6f 76 |l parms.|. mov|
|00001460| 65 2e 6c 20 20 20 20 20 | 20 61 30 2c 20 32 30 28 |e.l | a0, 20(|
|00001470| 73 70 29 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |sp) | |
|00001480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2f 2f 20 | | // |
|00001490| 4e 65 77 20 72 74 73 0d | 20 20 20 20 6d 6f 76 65 |New rts.| move|
|000014a0| 6d 2e 6c 20 20 20 20 20 | 28 73 70 29 2b 2c 20 61 |m.l |(sp)+, a|
|000014b0| 30 2d 61 31 2f 64 30 2d | 64 32 0d 0d 20 20 20 20 |0-a1/d0-|d2.. |
|000014c0| 6d 6f 76 65 2e 77 20 20 | 20 20 20 20 34 28 73 70 |move.w | 4(sp|
|000014d0| 29 2c 20 64 30 20 20 20 | 20 20 20 20 20 20 20 20 |), d0 | |
|000014e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000014f0| 2f 2f 20 52 65 73 74 6f | 72 65 20 64 30 20 66 72 |// Resto|re d0 fr|
|00001500| 6f 6d 20 6e 65 77 20 72 | 65 74 75 72 6e 20 76 61 |om new r|eturn va|
|00001510| 6c 75 65 0d 20 20 20 20 | 74 73 74 2e 6c 20 20 20 |lue. |tst.l |
|00001520| 20 20 20 20 28 73 70 29 | 0d 20 20 20 20 62 6e 65 | (sp)|. bne|
|00001530| 2e 73 20 20 20 20 20 20 | 20 40 31 0d 20 20 20 20 |.s | @1. |
|00001540| 61 64 64 71 2e 77 20 20 | 20 20 20 20 23 36 2c 20 |addq.w | #6, |
|00001550| 73 70 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |sp | |
|00001560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001570| 2f 2f 20 4b 69 6c 6c 20 | 4e 55 4c 4c 20 54 72 61 |// Kill |NULL Tra|
|00001580| 70 20 26 20 77 6f 72 64 | 20 72 65 74 75 72 6e 0d |p & word| return.|
|00001590| 40 31 3a 20 72 74 73 0d | 20 7d 0d 0d 23 65 6e 64 |@1: rts.| }..#end|
|000015a0| 69 66 20 20 2f 2f 20 20 | 49 53 41 50 50 43 0d 0d |if // |ISAPPC..|
|000015b0| 0d 0d 0d 73 74 61 74 69 | 63 20 53 79 73 50 72 6f |...stati|c SysPro|
|000015c0| 63 20 74 70 47 65 74 31 | 52 65 73 6f 75 72 63 65 |c tpGet1|Resource|
|000015d0| 58 28 69 64 65 6e 74 20 | 6b 69 6e 64 2c 20 73 68 |X(ident |kind, sh|
|000015e0| 6f 72 74 20 72 65 73 4e | 75 6d 2c 20 48 61 6e 64 |ort resN|um, Hand|
|000015f0| 6c 65 20 2a 20 72 65 74 | 48 64 6c 29 0d 20 7b 0d |le * ret|Hdl). {.|
|00001600| 20 2f 2a 20 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 | /* ....|........|
|00001610| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00001620| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00001630| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 0d 20 |........|....... |
|00001640| 20 20 20 74 70 20 20 20 | 20 20 20 47 65 74 31 52 | tp | Get1R|
|00001650| 65 73 6f 75 72 63 65 58 | 0d 20 20 20 20 0d 20 20 |esourceX|. . |
|00001660| 20 20 49 6e 20 20 20 20 | 20 20 0d 20 20 20 20 4f | In | . O|
|00001670| 75 74 20 20 20 20 20 0d | 0d 20 20 20 20 45 66 66 |ut .|. Eff|
|00001680| 65 63 74 20 20 47 72 61 | 62 20 65 76 65 6e 74 73 |ect Gra|b events|
|00001690| 2c 20 63 68 65 63 6b 20 | 27 65 6d 20 6f 75 74 2c |, check |'em out,|
|000016a0| 20 61 6e 64 20 70 61 73 | 73 20 27 65 6d 20 6f 6e | and pas|s 'em on|
|000016b0| c9 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 28 4b |.. | (K|
|000016c0| 65 65 70 20 74 72 61 63 | 6b 20 6f 66 20 69 64 6c |eep trac|k of idl|
|000016d0| 65 20 66 6f 72 20 41 75 | 74 6f 4f 4b 20 66 75 6e |e for Au|toOK fun|
|000016e0| 63 74 69 6f 6e 20 61 6e | 64 0d 20 20 20 20 20 20 |ction an|d. |
|000016f0| 20 20 20 20 20 20 20 70 | 6f 70 2d 75 70 20 75 74 | p|op-up ut|
|00001700| 69 6c 69 74 79 20 6d 65 | 6e 75 73 20 77 68 65 6e |ility me|nus when|
|00001710| 20 74 68 65 20 75 73 65 | 72 20 68 61 73 20 63 68 | the use|r has ch|
|00001720| 6f 73 65 6e 20 74 68 65 | 6d 29 2e 0d 0d 20 20 20 |osen the|m)... |
|00001730| 20 43 6f 6e 73 74 20 20 | 20 0d 20 20 20 20 45 72 | Const | . Er|
|00001740| 72 6f 72 73 20 20 0d 20 | 20 20 20 46 6c 61 67 73 |rors . | Flags|
|00001750| 20 20 20 0d 20 20 20 20 | 47 6c 6f 62 61 6c 20 20 | . |Global |
|00001760| 0d 20 20 20 20 52 73 72 | 63 20 20 20 20 0d 0d 20 |. Rsr|c .. |
|00001770| 20 20 20 56 65 72 73 69 | 6f 6e 20 30 30 31 0d 20 | Versi|on 001. |
|00001780| 20 20 20 4e 6f 74 65 73 | 20 20 20 0d 20 20 20 20 | Notes| . |
|00001790| 48 69 73 74 6f 72 79 0d | 20 20 20 20 30 30 31 20 |History.| 001 |
|000017a0| 47 4f 44 20 31 32 2e 30 | 37 2e 39 35 20 77 64 53 |GOD 12.0|7.95 wdS|
|000017b0| 65 6c 65 63 74 20 61 63 | 74 69 6f 6e 20 6d 6f 76 |elect ac|tion mov|
|000017c0| 65 64 20 68 65 72 65 0d | 20 20 20 20 20 20 20 20 |ed here.| |
|000017d0| 20 20 20 20 20 41 63 74 | 69 6f 6e 20 6e 6f 77 20 | Act|ion now |
|000017e0| 69 6e 63 6c 75 64 65 73 | 20 32 20 73 65 63 73 20 |includes| 2 secs |
|000017f0| 6f 72 20 6d 6f 72 65 20 | 6f 66 0d 20 20 20 20 20 |or more |of. |
|00001800| 20 20 20 20 20 20 20 20 | 65 76 65 6e 74 73 20 6e | |events n|
|00001810| 6f 74 20 62 65 69 6e 67 | 20 70 72 6f 63 65 73 73 |ot being| process|
|00001820| 65 64 2e 0d 20 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |ed.. ...|........|
|00001830| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00001840| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00001850| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00001860| 20 2a 2f 0d 20 20 20 20 | 45 6e 74 65 72 43 6f 64 | */. |EnterCod|
|00001870| 65 52 73 72 63 28 29 3b | 0d 0d 20 20 20 20 53 79 |eRsrc();|.. Sy|
|00001880| 73 50 72 6f 63 20 74 72 | 61 70 20 3d 20 67 61 74 |sProc tr|ap = gat|
|00001890| 54 72 61 70 73 5b 6b 74 | 72 47 65 74 31 52 65 73 |Traps[kt|rGet1Res|
|000018a0| 6f 75 72 63 65 5d 3b 0d | 0d 20 20 20 20 69 66 20 |ource];.|. if |
|000018b0| 28 28 6b 69 6e 64 20 3d | 3d 20 69 72 63 53 69 7a |((kind =|= ircSiz|
|000018c0| 65 4f 66 48 65 61 70 29 | 20 26 26 20 6d 63 4f 62 |eOfHeap)| && mcOb|
|000018d0| 6a 54 73 74 28 26 67 72 | 70 2c 20 62 72 70 49 73 |jTst(&gr|p, brpIs|
|000018e0| 4c 61 75 6e 63 68 69 6e | 67 29 29 0d 20 20 20 20 |Launchin|g)). |
|000018f0| 20 7b 0d 23 69 66 20 20 | 20 20 20 20 20 20 20 49 | {.#if | I|
|00001900| 53 41 50 50 43 0d 20 20 | 20 20 20 20 20 20 69 66 |SAPPC. | if|
|00001910| 20 28 48 61 6e 64 6c 65 | 20 68 64 6c 20 3d 20 28 | (Handle| hdl = (|
|00001920| 48 61 6e 64 6c 65 29 43 | 61 6c 6c 55 6e 69 76 65 |Handle)C|allUnive|
|00001930| 72 73 61 6c 50 72 6f 63 | 28 74 72 61 70 2c 20 62 |rsalProc|(trap, b|
|00001940| 70 69 47 65 74 31 52 65 | 73 6f 75 72 63 65 2c 20 |piGet1Re|source, |
|00001950| 6b 69 6e 64 2c 20 72 65 | 73 4e 75 6d 29 29 0d 23 |kind, re|sNum)).#|
|00001960| 65 6c 73 65 20 20 20 2f | 2f 20 20 49 53 41 50 50 |else /|/ ISAPP|
|00001970| 43 0d 20 20 20 20 20 20 | 20 20 69 66 20 28 48 61 |C. | if (Ha|
|00001980| 6e 64 6c 65 20 68 64 6c | 20 3d 20 28 48 61 6e 64 |ndle hdl| = (Hand|
|00001990| 6c 65 29 28 2a 28 74 70 | 47 65 74 31 52 65 73 6f |le)(*(tp|Get1Reso|
|000019a0| 75 72 63 65 50 72 6f 63 | 29 74 72 61 70 29 28 6b |urceProc|)trap)(k|
|000019b0| 69 6e 64 2c 20 72 65 73 | 4e 75 6d 29 29 0d 23 65 |ind, res|Num)).#e|
|000019c0| 6e 64 69 66 20 20 2f 2f | 20 20 49 53 41 50 50 43 |ndif //| ISAPPC|
|000019d0| 0d 20 20 20 20 20 20 20 | 20 20 7b 0d 20 20 20 20 |. | {. |
|000019e0| 20 20 20 20 20 20 20 20 | 2a 72 65 74 48 64 6c 20 | |*retHdl |
|000019f0| 3d 20 68 64 6c 3b 0d 20 | 20 20 20 20 20 20 20 20 |= hdl;. | |
|00001a00| 20 20 20 74 72 61 70 20 | 3d 20 4e 55 4c 4c 3b 0d | trap |= NULL;.|
|00001a10| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 6c 6f 6e |. | lon|
|00001a20| 67 20 20 20 20 6f 72 69 | 67 69 6e 61 6c 53 69 7a |g ori|ginalSiz|
|00001a30| 65 20 3d 20 2a 28 6c 6f | 6e 67 20 2a 29 28 2a 68 |e = *(lo|ng *)(*h|
|00001a40| 64 6c 20 2b 20 32 29 3b | 0d 0d 20 20 20 20 20 20 |dl + 2);|.. |
|00001a50| 20 20 20 20 20 20 69 66 | 20 28 21 28 6f 72 69 67 | if| (!(orig|
|00001a60| 69 6e 61 6c 53 69 7a 65 | 20 26 20 30 78 46 46 29 |inalSize| & 0xFF)|
|00001a70| 29 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 7b |). | {|
|00001a80| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001a90| 20 6d 6d 48 64 6c 50 75 | 72 67 65 4f 66 66 28 68 | mmHdlPu|rgeOff(h|
|00001aa0| 64 6c 29 3b 0d 20 20 20 | 20 20 20 20 20 20 20 20 |dl);. | |
|00001ab0| 20 20 20 20 20 2a 28 6c | 6f 6e 67 20 2a 29 28 2a | *(l|ong *)(*|
|00001ac0| 68 64 6c 20 2b 20 32 29 | 20 3d 20 72 70 46 69 6e |hdl + 2)| = rpFin|
|00001ad0| 64 48 65 61 70 53 69 7a | 65 28 2a 67 72 70 2e 70 |dHeapSiz|e(*grp.p|
|00001ae0| 72 65 66 73 2c 20 43 75 | 72 52 65 73 46 69 6c 65 |refs, Cu|rResFile|
|00001af0| 28 29 2c 20 6f 72 69 67 | 69 6e 61 6c 53 69 7a 65 |(), orig|inalSize|
|00001b00| 29 3b 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |);. | |
|00001b10| 7d 0d 20 20 20 20 20 20 | 20 20 20 7d 0d 20 20 20 |}. | }. |
|00001b20| 20 20 7d 0d 0d 20 20 20 | 20 4c 65 61 76 65 43 6f | }.. | LeaveCo|
|00001b30| 64 65 52 73 72 63 28 29 | 3b 0d 0d 20 20 20 20 72 |deRsrc()|;.. r|
|00001b40| 65 74 75 72 6e 20 20 74 | 72 61 70 3b 0d 20 7d 0d |eturn t|rap;. }.|
|00001b50| 0d 0d 23 69 66 20 20 20 | 20 20 20 20 20 20 49 53 |..#if | IS|
|00001b60| 41 50 50 43 0d 0d 73 74 | 61 74 69 63 20 53 79 73 |APPC..st|atic Sys|
|00001b70| 50 72 6f 63 44 65 66 20 | 78 61 47 65 74 31 52 65 |ProcDef |xaGet1Re|
|00001b80| 73 6f 75 72 63 65 20 3d | 20 42 55 49 4c 44 5f 52 |source =| BUILD_R|
|00001b90| 4f 55 54 49 4e 45 5f 44 | 45 53 43 52 49 50 54 4f |OUTINE_D|ESCRIPTO|
|00001ba0| 52 28 62 70 69 47 65 74 | 31 52 65 73 6f 75 72 63 |R(bpiGet|1Resourc|
|00001bb0| 65 2c 20 78 61 47 65 74 | 31 52 65 73 6f 75 72 63 |e, xaGet|1Resourc|
|00001bc0| 65 50 50 43 29 3b 0d 0d | 73 74 61 74 69 63 20 70 |ePPC);..|static p|
|00001bd0| 61 73 63 61 6c 20 48 61 | 6e 64 6c 65 20 78 61 47 |ascal Ha|ndle xaG|
|00001be0| 65 74 31 52 65 73 6f 75 | 72 63 65 50 50 43 28 52 |et1Resou|rcePPC(R|
|00001bf0| 65 73 54 79 70 65 20 6b | 69 6e 64 2c 20 73 68 6f |esType k|ind, sho|
|00001c00| 72 74 20 72 65 73 4e 75 | 6d 29 0d 20 7b 0d 20 20 |rt resNu|m). {. |
|00001c10| 20 20 48 61 6e 64 6c 65 | 20 20 20 20 20 20 20 20 | Handle| |
|00001c20| 20 20 20 20 20 20 20 20 | 20 20 68 3b 0d 0d 20 20 | | h;.. |
|00001c30| 20 20 69 66 20 28 53 79 | 73 50 72 6f 63 20 70 20 | if (Sy|sProc p |
|00001c40| 3d 20 74 70 47 65 74 31 | 52 65 73 6f 75 72 63 65 |= tpGet1|Resource|
|00001c50| 58 28 6b 69 6e 64 2c 20 | 72 65 73 4e 75 6d 2c 20 |X(kind, |resNum, |
|00001c60| 26 68 29 29 0d 20 20 20 | 20 20 20 20 20 72 65 74 |&h)). | ret|
|00001c70| 75 72 6e 20 20 28 48 61 | 6e 64 6c 65 29 43 61 6c |urn (Ha|ndle)Cal|
|00001c80| 6c 55 6e 69 76 65 72 73 | 61 6c 50 72 6f 63 28 70 |lUnivers|alProc(p|
|00001c90| 2c 20 62 70 69 47 65 74 | 31 52 65 73 6f 75 72 63 |, bpiGet|1Resourc|
|00001ca0| 65 2c 20 6b 69 6e 64 2c | 20 72 65 73 4e 75 6d 29 |e, kind,| resNum)|
|00001cb0| 3b 0d 0d 20 20 20 20 72 | 65 74 75 72 6e 20 20 68 |;.. r|eturn h|
|00001cc0| 3b 0d 20 7d 0d 0d 23 65 | 6c 73 65 20 20 20 2f 2f |;. }..#e|lse //|
|00001cd0| 20 20 49 53 41 50 50 43 | 0d 0d 73 74 61 74 69 63 | ISAPPC|..static|
|00001ce0| 20 70 61 73 63 61 6c 20 | 61 73 6d 20 48 61 6e 64 | pascal |asm Hand|
|00001cf0| 6c 65 20 78 61 47 65 74 | 31 52 65 73 6f 75 72 63 |le xaGet|1Resourc|
|00001d00| 65 28 52 65 73 54 79 70 | 65 20 6b 69 6e 64 2c 20 |e(ResTyp|e kind, |
|00001d10| 73 68 6f 72 74 20 72 65 | 73 49 44 29 0d 20 7b 0d |short re|sID). {.|
|00001d20| 2f 2f 20 20 31 38 30 20 | 47 4f 44 20 32 30 2e 30 |// 180 |GOD 20.0|
|00001d30| 33 2e 39 36 20 20 20 20 | 4c 6f 74 73 20 6f 27 20 |3.96 |Lots o' |
|00001d40| 63 68 61 6e 67 65 73 2c | 20 69 6e 63 6c 75 64 69 |changes,| includi|
|00001d50| 6e 67 20 73 61 76 69 6e | 67 20 41 31 20 61 72 6f |ng savin|g A1 aro|
|00001d60| 75 6e 64 20 47 65 74 52 | 65 73 6f 75 72 63 65 20 |und GetR|esource |
|00001d70| 73 69 6e 63 65 20 56 69 | 73 65 49 6e 73 74 61 6c |since Vi|seInstal|
|00001d80| 6c 65 72 20 70 72 65 73 | 75 6d 65 73 20 74 68 69 |ler pres|umes thi|
|00001d90| 73 0d 2f 2f 20 20 20 20 | 20 20 20 20 20 20 20 20 |s.// | |
|00001da0| 20 20 20 20 20 20 20 20 | 20 20 20 74 68 65 20 64 | | the d|
|00001db0| 69 63 6b 68 65 61 64 73 | 21 0d 0d 20 20 20 20 65 |ickheads|!.. e|
|00001dc0| 6e 75 6d 20 50 61 72 6d | 53 69 7a 65 73 20 7b 20 |num Parm|Sizes { |
|00001dd0| 70 61 72 6d 73 53 69 7a | 65 20 3d 20 73 69 7a 65 |parmsSiz|e = size|
|00001de0| 6f 66 28 52 65 73 54 79 | 70 65 29 20 2b 20 73 69 |of(ResTy|pe) + si|
|00001df0| 7a 65 6f 66 28 73 68 6f | 72 74 29 20 7d 3b 0d 0d |zeof(sho|rt) };..|
|00001e00| 20 20 20 20 6d 6f 76 65 | 6d 2e 6c 20 20 20 20 20 | move|m.l |
|00001e10| 64 31 2d 64 32 2f 61 31 | 2c 20 2d 28 73 70 29 0d |d1-d2/a1|, -(sp).|
|00001e20| 20 20 20 20 73 75 62 71 | 2e 77 20 20 20 20 20 20 | subq|.w |
|00001e30| 23 34 2c 20 73 70 20 20 | 20 20 20 20 20 20 20 20 |#4, sp | |
|00001e40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e50| 2f 2f 20 53 70 61 63 65 | 20 66 6f 72 20 72 65 74 |// Space| for ret|
|00001e60| 75 72 6e 0d 20 20 20 20 | 70 65 61 20 20 20 20 20 |urn. |pea |
|00001e70| 20 20 20 20 28 73 70 29 | 20 20 20 20 20 20 20 20 | (sp)| |
|00001e80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e90| 20 20 20 20 2f 2f 20 50 | 6f 69 6e 74 65 72 20 74 | // P|ointer t|
|00001ea0| 6f 20 69 74 0d 20 20 20 | 20 6d 6f 76 65 2e 77 20 |o it. | move.w |
|00001eb0| 20 20 20 20 20 34 20 2b | 20 38 20 2b 20 31 32 28 | 4 +| 8 + 12(|
|00001ec0| 73 70 29 2c 20 2d 28 73 | 70 29 20 20 20 20 20 20 |sp), -(s|p) |
|00001ed0| 20 20 20 20 20 2f 2f 20 | 72 65 73 49 44 20 40 20 | // |resID @ |
|00001ee0| 52 65 74 41 64 72 20 2b | 20 52 65 74 56 61 6c 20 |RetAdr +| RetVal |
|00001ef0| 2b 20 52 65 67 73 0d 20 | 20 20 20 6d 6f 76 65 2e |+ Regs. | move.|
|00001f00| 6c 20 20 20 20 20 20 34 | 20 2b 20 38 20 2b 20 31 |l 4| + 8 + 1|
|00001f10| 32 20 2b 20 34 28 73 70 | 29 2c 20 2d 28 73 70 29 |2 + 4(sp|), -(sp)|
|00001f20| 20 20 20 20 20 20 20 2f | 2f 20 6b 69 6e 64 20 40 | /|/ kind @|
|00001f30| 20 52 65 74 41 64 72 20 | 2b 20 52 65 74 56 61 6c | RetAdr |+ RetVal|
|00001f40| 20 2b 20 52 65 67 73 20 | 2b 20 72 65 73 49 44 20 | + Regs |+ resID |
|00001f50| 2b 20 72 65 73 49 44 28 | 70 61 72 6d 29 0d 20 20 |+ resID(|parm). |
|00001f60| 20 20 6a 73 72 20 20 20 | 20 20 20 20 20 20 74 70 | jsr | tp|
|00001f70| 47 65 74 31 52 65 73 6f | 75 72 63 65 58 0d 20 20 |Get1Reso|urceX. |
|00001f80| 20 20 61 64 64 71 2e 77 | 20 20 20 20 20 20 23 34 | addq.w| #4|
|00001f90| 2c 20 73 70 0d 20 20 20 | 20 61 64 64 71 2e 77 20 |, sp. | addq.w |
|00001fa0| 20 20 20 20 20 23 36 2c | 20 73 70 0d 20 20 20 20 | #6,| sp. |
|00001fb0| 6d 6f 76 65 2e 6c 20 20 | 20 20 20 20 28 73 70 29 |move.l | (sp)|
|00001fc0| 2b 2c 20 70 61 72 6d 73 | 53 69 7a 65 20 2b 20 34 |+, parms|Size + 4|
|00001fd0| 20 2b 20 31 32 28 73 70 | 29 3b 20 20 2f 2f 20 50 | + 12(sp|); // P|
|00001fe0| 61 72 6d 73 20 2b 20 52 | 65 74 41 64 72 20 2b 20 |arms + R|etAdr + |
|00001ff0| 53 61 76 65 64 52 65 67 | 73 0d 20 20 20 20 6d 6f |SavedReg|s. mo|
|00002000| 76 65 6d 2e 6c 20 20 20 | 20 20 28 73 70 29 2b 2c |vem.l | (sp)+,|
|00002010| 20 64 31 2d 64 32 2f 61 | 31 0d 0d 20 20 20 20 2f | d1-d2/a|1.. /|
|00002020| 2f 20 52 65 74 75 72 6e | 20 69 6e 20 61 30 20 66 |/ Return| in a0 f|
|00002030| 6f 72 20 4d 57 43 21 0d | 20 20 20 20 6d 6f 76 65 |or MWC!.| move|
|00002040| 2e 6c 20 20 20 20 20 20 | 61 30 2c 20 64 30 0d 20 |.l |a0, d0. |
|00002050| 20 20 20 62 6e 65 2e 73 | 20 20 20 20 20 20 20 40 | bne.s| @|
|00002060| 31 0d 20 20 20 20 6d 6f | 76 65 2e 6c 20 20 20 20 |1. mo|ve.l |
|00002070| 20 20 28 73 70 29 2b 2c | 20 61 30 20 20 20 20 20 | (sp)+,| a0 |
|00002080| 20 20 20 20 20 20 2f 2f | 20 43 61 6c 6c 65 72 27 | //| Caller'|
|00002090| 73 20 61 64 64 72 65 73 | 73 0d 20 20 20 20 61 64 |s addres|s. ad|
|000020a0| 64 71 2e 77 20 20 20 20 | 20 20 23 70 61 72 6d 73 |dq.w | #parms|
|000020b0| 53 69 7a 65 2c 20 73 70 | 20 20 20 20 20 20 2f 2f |Size, sp| //|
|000020c0| 20 57 65 20 62 65 20 70 | 61 73 63 61 6c 0d 20 20 | We be p|ascal. |
|000020d0| 20 20 6d 6f 76 65 2e 77 | 20 20 20 20 20 20 6b 6f | move.w| ko|
|000020e0| 73 52 65 73 45 72 72 2c | 20 64 30 20 20 20 20 20 |sResErr,| d0 |
|000020f0| 20 20 2f 2f 20 53 65 74 | 20 72 30 0d 40 31 3a 20 | // Set| r0.@1: |
|00002100| 6a 6d 70 20 20 20 20 20 | 20 20 20 20 28 61 30 29 |jmp | (a0)|
|00002110| 0d 20 7d 0d 0d 23 65 6e | 64 69 66 20 20 2f 2f 20 |. }..#en|dif // |
|00002120| 20 49 53 41 50 50 43 0d | 0d 0d 0d 0d 0d 0d 73 74 | ISAPPC.|......st|
|00002130| 61 74 69 63 20 48 61 6e | 64 6c 65 20 74 70 4e 65 |atic Han|dle tpNe|
|00002140| 77 48 61 6e 64 6c 65 58 | 28 77 6f 72 64 20 74 77 |wHandleX|(word tw|
|00002150| 2c 20 53 69 7a 65 20 61 | 6d 74 29 0d 20 7b 0d 20 |, Size a|mt). {. |
|00002160| 2f 2a 20 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |/* .....|........|
|00002170| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00002180| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00002190| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 0d 20 20 |........|...... |
|000021a0| 20 20 74 70 20 54 72 61 | 70 20 4e 65 77 48 61 6e | tp Tra|p NewHan|
|000021b0| 64 6c 65 58 0d 20 20 20 | 20 0d 20 20 20 20 49 6e |dleX. | . In|
|000021c0| 20 20 20 20 20 20 0d 20 | 20 20 20 4f 75 74 20 20 | . | Out |
|000021d0| 20 20 20 0d 20 20 20 20 | 45 72 72 6f 72 73 20 20 | . |Errors |
|000021e0| 0d 20 20 20 20 45 66 66 | 65 63 74 20 20 52 65 70 |. Eff|ect Rep|
|000021f0| 6c 61 63 65 20 6b 6e 6f | 77 6e 20 6e 61 6d 65 73 |lace kno|wn names|
|00002200| 20 77 69 74 68 20 69 63 | 6f 6e 20 73 75 69 74 65 | with ic|on suite|
|00002210| 73 0d 20 20 20 20 43 6f | 6e 73 74 20 20 20 0d 20 |s. Co|nst . |
|00002220| 20 20 20 47 6c 6f 62 61 | 6c 20 20 0d 20 20 20 20 | Globa|l . |
|00002230| 52 73 72 63 20 20 20 20 | 0d 20 20 20 20 4e 6f 74 |Rsrc |. Not|
|00002240| 65 73 20 20 20 45 6e 74 | 65 72 43 6f 64 65 52 73 |es Ent|erCodeRs|
|00002250| 72 63 28 29 20 2d 2d 20 | 53 65 74 43 75 72 72 65 |rc() -- |SetCurre|
|00002260| 6e 74 41 34 28 29 20 6d | 75 73 74 20 62 65 20 64 |ntA4() m|ust be d|
|00002270| 6f 6e 65 20 62 79 20 36 | 38 4b 20 63 61 6c 6c 65 |one by 6|8K calle|
|00002280| 72 21 21 21 0d 20 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |r!!!. ..|........|
|00002290| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000022a0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000022b0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000022c0| d0 20 2a 2f 0d 20 20 20 | 20 48 61 6e 64 6c 65 20 |. */. | Handle |
|000022d0| 20 20 20 20 20 20 20 20 | 20 68 3b 0d 20 20 20 20 | | h;. |
|000022e0| 4f 53 45 72 72 20 20 20 | 20 20 20 20 20 20 20 20 |OSErr | |
|000022f0| 65 72 72 3b 0d 0d 20 20 | 20 20 69 66 28 21 28 68 |err;.. | if(!(h|
|00002300| 20 3d 20 54 65 6d 70 4e | 65 77 48 61 6e 64 6c 65 | = TempN|ewHandle|
|00002310| 28 61 6d 74 2c 20 26 65 | 72 72 29 29 20 7c 7c 20 |(amt, &e|rr)) || |
|00002320| 65 72 72 29 0d 20 20 20 | 20 20 7b 0d 20 20 20 20 |err). | {. |
|00002330| 20 20 20 20 68 20 3d 20 | 4e 55 4c 4c 3b 0d 20 20 | h = |NULL;. |
|00002340| 20 20 20 20 20 20 6f 73 | 4d 65 6d 45 72 72 20 3d | os|MemErr =|
|00002350| 20 65 72 72 3b 0d 20 20 | 20 20 20 20 20 20 2f 2f | err;. | //|
|00002360| 20 47 6f 20 66 6f 72 20 | 61 6c 74 65 72 6e 61 74 | Go for |alternat|
|00002370| 65 20 7a 6f 6e 65 73 20 | 2d 20 67 6f 69 6e 67 20 |e zones |- going |
|00002380| 66 6f 72 20 53 79 73 20 | 6d 61 79 20 6c 6f 6f 70 |for Sys |may loop|
|00002390| 20 62 61 63 6b 20 74 6f | 20 75 73 21 0d 2f 2f 20 | back to| us!.// |
|000023a0| 20 20 20 20 20 68 20 3d | 20 4e 65 77 48 61 6e 64 | h =| NewHand|
|000023b0| 6c 65 53 79 73 28 61 6d | 74 29 3b 0d 20 20 20 20 |leSys(am|t);. |
|000023c0| 20 7d 0d 20 20 20 20 65 | 6c 73 65 20 69 66 20 28 | }. e|lse if (|
|000023d0| 6d 63 46 6c 61 67 54 73 | 74 28 74 77 2c 20 62 6f |mcFlagTs|t(tw, bo|
|000023e0| 73 54 72 61 70 49 73 43 | 6c 72 29 29 0d 20 20 20 |sTrapIsC|lr)). |
|000023f0| 20 20 20 20 20 6d 6d 42 | 6c 6b 43 6c 72 28 2a 68 | mmB|lkClr(*h|
|00002400| 2c 20 61 6d 74 29 3b 0d | 0d 20 20 20 20 72 65 74 |, amt);.|. ret|
|00002410| 75 72 6e 20 20 68 3b 0d | 20 7d 0d 0d 0d 2f 2f 20 |urn h;.| }...// |
|00002420| 47 4c 55 45 20 43 6f 64 | 65 20 66 6f 72 20 74 70 |GLUE Cod|e for tp|
|00002430| 4e 65 77 48 61 6e 64 6c | 65 0d 23 69 66 20 20 20 |NewHandl|e.#if |
|00002440| 20 20 20 20 20 20 49 53 | 41 50 50 43 0d 0d 73 74 | IS|APPC..st|
|00002450| 61 74 69 63 20 52 6f 75 | 74 69 6e 65 44 65 73 63 |atic Rou|tineDesc|
|00002460| 72 69 70 74 6f 72 20 78 | 61 4e 65 77 48 61 6e 64 |riptor x|aNewHand|
|00002470| 6c 65 20 3d 20 42 55 49 | 4c 44 5f 52 4f 55 54 49 |le = BUI|LD_ROUTI|
|00002480| 4e 45 5f 44 45 53 43 52 | 49 50 54 4f 52 28 62 70 |NE_DESCR|IPTOR(bp|
|00002490| 69 4e 65 77 48 61 6e 64 | 6c 65 2c 20 78 61 4e 65 |iNewHand|le, xaNe|
|000024a0| 77 48 61 6e 64 6c 65 50 | 50 43 29 3b 0d 0d 73 74 |wHandleP|PC);..st|
|000024b0| 61 74 69 63 20 70 61 73 | 63 61 6c 20 48 61 6e 64 |atic pas|cal Hand|
|000024c0| 6c 65 20 78 61 4e 65 77 | 48 61 6e 64 6c 65 50 50 |le xaNew|HandlePP|
|000024d0| 43 28 77 6f 72 64 20 74 | 77 2c 20 53 69 7a 65 20 |C(word t|w, Size |
|000024e0| 61 6d 74 29 0d 20 7b 0d | 20 20 20 20 48 61 6e 64 |amt). {.| Hand|
|000024f0| 6c 65 20 20 20 20 20 20 | 68 3b 0d 0d 0d 20 20 20 |le |h;... |
|00002500| 20 69 66 20 28 21 28 68 | 20 3d 20 28 48 61 6e 64 | if (!(h| = (Hand|
|00002510| 6c 65 29 43 61 6c 6c 4f | 53 54 72 61 70 55 6e 69 |le)CallO|STrapUni|
|00002520| 76 65 72 73 61 6c 50 72 | 6f 63 28 67 61 74 54 72 |versalPr|oc(gatTr|
|00002530| 61 70 73 5b 6b 74 72 4e | 65 77 48 61 6e 64 6c 65 |aps[ktrN|ewHandle|
|00002540| 5d 2c 20 62 70 69 4e 65 | 77 48 61 6e 64 6c 65 2c |], bpiNe|wHandle,|
|00002550| 20 74 77 2c 20 61 6d 74 | 29 29 29 0d 20 20 20 20 | tw, amt|))). |
|00002560| 20 20 20 20 69 66 20 28 | 21 6d 63 46 6c 61 67 54 | if (|!mcFlagT|
|00002570| 73 74 28 74 77 2c 20 62 | 6f 73 54 72 61 70 49 73 |st(tw, b|osTrapIs|
|00002580| 53 79 73 29 20 26 26 20 | 28 6f 73 54 68 65 5a 6f |Sys) && |(osTheZo|
|00002590| 6e 65 20 3d 3d 20 6f 73 | 41 70 70 6c 5a 6f 6e 65 |ne == os|ApplZone|
|000025a0| 29 29 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 68 |)). | h|
|000025b0| 20 3d 20 74 70 4e 65 77 | 48 61 6e 64 6c 65 58 28 | = tpNew|HandleX(|
|000025c0| 74 77 2c 20 61 6d 74 29 | 3b 0d 0d 20 20 20 20 72 |tw, amt)|;.. r|
|000025d0| 65 74 75 72 6e 20 20 68 | 3b 0d 20 7d 0d 0d 0d 0d |eturn h|;. }....|
|000025e0| 73 74 61 74 69 63 20 52 | 6f 75 74 69 6e 65 44 65 |static R|outineDe|
|000025f0| 73 63 72 69 70 74 6f 72 | 20 78 61 4e 65 77 48 61 |scriptor| xaNewHa|
|00002600| 6e 64 6c 65 53 6d 61 72 | 74 20 3d 20 42 55 49 4c |ndleSmar|t = BUIL|
|00002610| 44 5f 52 4f 55 54 49 4e | 45 5f 44 45 53 43 52 49 |D_ROUTIN|E_DESCRI|
|00002620| 50 54 4f 52 28 62 70 69 | 4e 65 77 48 61 6e 64 6c |PTOR(bpi|NewHandl|
|00002630| 65 2c 20 78 61 4e 65 77 | 48 61 6e 64 6c 65 53 6d |e, xaNew|HandleSm|
|00002640| 61 72 74 50 50 43 29 3b | 0d 0d 73 74 61 74 69 63 |artPPC);|..static|
|00002650| 20 70 61 73 63 61 6c 20 | 48 61 6e 64 6c 65 20 78 | pascal |Handle x|
|00002660| 61 4e 65 77 48 61 6e 64 | 6c 65 53 6d 61 72 74 50 |aNewHand|leSmartP|
|00002670| 50 43 28 77 6f 72 64 20 | 74 77 2c 20 53 69 7a 65 |PC(word |tw, Size|
|00002680| 20 61 6d 74 29 0d 20 7b | 0d 20 20 20 20 48 61 6e | amt). {|. Han|
|00002690| 64 6c 65 20 20 20 20 20 | 20 68 20 20 20 20 20 20 |dle | h |
|000026a0| 20 3d 20 4e 55 4c 4c 3b | 0d 20 20 20 20 62 6f 6f | = NULL;|. boo|
|000026b0| 6c 20 20 20 20 20 20 20 | 20 73 6d 61 72 74 20 20 |l | smart |
|000026c0| 20 3d 20 21 6d 63 46 6c | 61 67 54 73 74 28 74 77 | = !mcFl|agTst(tw|
|000026d0| 2c 20 62 6f 73 54 72 61 | 70 49 73 53 79 73 29 20 |, bosTra|pIsSys) |
|000026e0| 26 26 20 28 6f 73 54 68 | 65 5a 6f 6e 65 20 3d 3d |&& (osTh|eZone ==|
|000026f0| 20 6f 73 41 70 70 6c 5a | 6f 6e 65 29 3b 0d 0d 0d | osApplZ|one);...|
|00002700| 20 20 20 20 2f 2f 20 46 | 72 6f 6d 20 4f 70 65 6e | // F|rom Open|
|00002710| 50 69 63 74 75 72 65 3f | 0d 20 20 20 20 69 66 20 |Picture?|. if |
|00002720| 28 73 6d 61 72 74 29 0d | 20 20 20 20 20 20 20 20 |(smart).| |
|00002730| 69 66 20 28 6d 63 4f 62 | 6a 54 73 74 28 26 67 72 |if (mcOb|jTst(&gr|
|00002740| 70 2c 20 62 72 70 49 6e | 4f 70 65 6e 50 69 63 74 |p, brpIn|OpenPict|
|00002750| 75 72 65 29 20 7c 7c 20 | 28 61 6d 74 20 3e 20 28 |ure) || |(amt > (|
|00002760| 6f 73 54 68 65 5a 6f 6e | 65 2d 3e 7a 63 62 46 72 |osTheZon|e->zcbFr|
|00002770| 65 65 20 3e 3e 20 32 29 | 29 29 0d 20 20 20 20 20 |ee >> 2)|)). |
|00002780| 20 20 20 20 20 20 20 69 | 66 20 28 6f 73 54 68 65 | i|f (osThe|
|00002790| 5a 6f 6e 65 2d 3e 7a 63 | 62 46 72 65 65 20 3c 20 |Zone->zc|bFree < |
|000027a0| 54 65 6d 70 46 72 65 65 | 4d 65 6d 28 29 29 20 2f |TempFree|Mem()) /|
|000027b0| 2f 20 67 72 70 2e 74 6d | 70 5a 6f 6e 65 2d 3e 7a |/ grp.tm|pZone->z|
|000027c0| 63 62 46 72 65 65 29 0d | 20 20 20 20 20 20 20 20 |cbFree).| |
|000027d0| 20 20 20 20 20 20 20 20 | 68 20 3d 20 74 70 4e 65 | |h = tpNe|
|000027e0| 77 48 61 6e 64 6c 65 58 | 28 74 77 2c 20 61 6d 74 |wHandleX|(tw, amt|
|000027f0| 29 3b 0d 0d 20 20 20 20 | 69 66 20 28 21 68 29 0d |);.. |if (!h).|
|00002800| 20 20 20 20 20 20 20 20 | 69 66 20 28 21 28 68 20 | |if (!(h |
|00002810| 3d 20 28 48 61 6e 64 6c | 65 29 43 61 6c 6c 4f 53 |= (Handl|e)CallOS|
|00002820| 54 72 61 70 55 6e 69 76 | 65 72 73 61 6c 50 72 6f |TrapUniv|ersalPro|
|00002830| 63 28 67 61 74 54 72 61 | 70 73 5b 6b 74 72 4e 65 |c(gatTra|ps[ktrNe|
|00002840| 77 48 61 6e 64 6c 65 5d | 2c 20 62 70 69 4e 65 77 |wHandle]|, bpiNew|
|00002850| 48 61 6e 64 6c 65 2c 20 | 74 77 2c 20 61 6d 74 29 |Handle, |tw, amt)|
|00002860| 29 29 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 69 |)). | i|
|00002870| 66 20 28 73 6d 61 72 74 | 29 0d 20 20 20 20 20 20 |f (smart|). |
|00002880| 20 20 20 20 20 20 20 20 | 20 20 68 20 3d 20 74 70 | | h = tp|
|00002890| 4e 65 77 48 61 6e 64 6c | 65 58 28 74 77 2c 20 61 |NewHandl|eX(tw, a|
|000028a0| 6d 74 29 3b 0d 0d 20 20 | 20 20 72 65 74 75 72 6e |mt);.. | return|
|000028b0| 20 20 68 3b 0d 20 7d 0d | 0d 23 65 6c 73 65 20 20 | h;. }.|.#else |
|000028c0| 20 2f 2f 20 20 49 53 41 | 50 50 43 0d 0d 73 74 61 | // ISA|PPC..sta|
|000028d0| 74 69 63 20 70 61 73 63 | 61 6c 20 61 73 6d 20 76 |tic pasc|al asm v|
|000028e0| 6f 69 64 20 78 61 4e 65 | 77 48 61 6e 64 6c 65 28 |oid xaNe|wHandle(|
|000028f0| 76 6f 69 64 29 20 20 20 | 20 2f 2f 20 50 61 72 61 |void) | // Para|
|00002900| 6d 65 74 65 72 20 69 6e | 20 72 65 67 69 73 74 65 |meter in| registe|
|00002910| 72 20 64 30 2c 20 74 72 | 61 70 57 6f 72 64 20 69 |r d0, tr|apWord i|
|00002920| 6e 20 64 31 0d 20 7b 0d | 20 20 20 20 6d 6f 76 65 |n d1. {.| move|
|00002930| 6d 2e 6c 20 20 20 20 20 | 64 31 2d 64 34 2f 61 31 |m.l |d1-d4/a1|
|00002940| 2d 61 34 2c 20 2d 28 73 | 70 29 0d 0d 20 20 20 20 |-a4, -(s|p).. |
|00002950| 6d 6f 76 65 2e 6c 20 20 | 20 20 20 20 64 30 2c 20 |move.l | d0, |
|00002960| 64 33 0d 20 20 20 20 6d | 6f 76 65 2e 77 20 20 20 |d3. m|ove.w |
|00002970| 20 20 20 64 31 2c 20 64 | 34 0d 0d 20 20 20 20 2f | d1, d|4.. /|
|00002980| 2f 20 41 63 63 65 73 73 | 20 74 6f 20 6f 75 72 20 |/ Access| to our |
|00002990| 67 6c 6f 62 61 6c 73 0d | 20 20 20 20 6a 73 72 20 |globals.| jsr |
|000029a0| 20 20 20 20 20 20 20 20 | 53 65 74 43 75 72 72 65 | |SetCurre|
|000029b0| 6e 74 41 34 0d 0d 2f 2f | 20 20 5f 44 65 62 75 67 |ntA4..//| _Debug|
|000029c0| 67 65 72 0d 0d 20 20 20 | 20 2f 2f 20 49 6e 20 53 |ger.. | // In S|
|000029d0| 79 73 74 65 6d 20 48 65 | 61 70 20 2d 20 4c 65 61 |ystem He|ap - Lea|
|000029e0| 76 65 20 69 74 20 61 6c | 6f 6e 65 0d 20 20 20 20 |ve it al|one. |
|000029f0| 62 74 73 74 20 20 20 20 | 20 20 20 20 23 62 6f 73 |btst | #bos|
|00002a00| 54 72 61 70 49 73 53 79 | 73 42 69 74 2c 20 64 34 |TrapIsSy|sBit, d4|
|00002a10| 0d 20 20 20 20 62 6e 65 | 20 20 20 20 20 20 20 20 |. bne| |
|00002a20| 20 40 37 0d 0d 20 20 20 | 20 2f 2f 20 4e 6f 74 20 | @7.. | // Not |
|00002a30| 41 70 70 20 5a 6f 6e 65 | 20 2d 20 6c 65 61 76 65 |App Zone| - leave|
|00002a40| 20 69 74 20 61 6c 6f 6e | 65 0d 20 20 20 20 6d 6f | it alon|e. mo|
|00002a50| 76 65 2e 6c 20 20 20 20 | 20 20 6b 6f 73 41 70 70 |ve.l | kosApp|
|00002a60| 6c 5a 6f 6e 65 2c 20 64 | 30 0d 20 20 20 20 6d 6f |lZone, d|0. mo|
|00002a70| 76 65 2e 6c 20 20 20 20 | 20 20 6b 6f 73 54 68 65 |ve.l | kosThe|
|00002a80| 5a 6f 6e 65 2c 20 64 31 | 0d 20 20 20 20 63 6d 70 |Zone, d1|. cmp|
|00002a90| 2e 6c 20 20 20 20 20 20 | 20 64 31 2c 20 64 30 0d |.l | d1, d0.|
|00002aa0| 20 20 20 20 62 65 71 20 | 20 20 20 20 20 20 20 20 | beq | |
|00002ab0| 40 36 0d 0d 40 37 3a 20 | 2f 2f 20 53 79 73 74 65 |@6..@7: |// Syste|
|00002ac0| 6d 20 6f 72 20 6f 74 68 | 65 72 20 7a 6f 6e 65 20 |m or oth|er zone |
|00002ad0| 2d 20 6f 75 74 20 6f 66 | 20 68 65 72 65 21 0d 20 |- out of| here!. |
|00002ae0| 20 20 20 6d 6f 76 65 2e | 6c 20 20 20 20 20 20 64 | move.|l d|
|00002af0| 33 2c 20 64 30 0d 20 20 | 20 20 6d 6f 76 65 2e 6c |3, d0. | move.l|
|00002b00| 20 20 20 20 20 20 67 61 | 74 54 72 61 70 73 20 2b | ga|tTraps +|
|00002b10| 20 28 6b 74 72 4e 65 77 | 48 61 6e 64 6c 65 20 2a | (ktrNew|Handle *|
|00002b20| 20 34 29 2c 20 61 30 0d | 20 20 20 20 6d 6f 76 65 | 4), a0.| move|
|00002b30| 6d 2e 6c 20 20 20 20 20 | 28 73 70 29 2b 2c 20 64 |m.l |(sp)+, d|
|00002b40| 31 2d 64 34 2f 61 31 2d | 61 34 0d 20 20 20 20 6a |1-d4/a1-|a4. j|
|00002b50| 6d 70 20 20 20 20 20 20 | 20 20 20 28 61 30 29 0d |mp | (a0).|
|00002b60| 0d 20 20 20 20 2f 2f 20 | 51 75 69 63 6b 20 43 68 |. // |Quick Ch|
|00002b70| 65 63 6b 20 69 66 20 74 | 68 61 74 20 6d 75 63 68 |eck if t|hat much|
|00002b80| 20 69 73 20 66 72 65 65 | 0d 2f 2a 20 20 6d 6f 76 | is free|./* mov|
|00002b90| 65 2e 6c 20 20 20 20 20 | 20 6b 6f 73 54 68 65 5a |e.l | kosTheZ|
|00002ba0| 6f 6e 65 2c 20 61 30 0d | 20 20 20 20 61 64 64 71 |one, a0.| addq|
|00002bb0| 2e 77 20 20 20 20 20 20 | 23 38 2c 20 61 30 0d 20 |.w |#8, a0. |
|00002bc0| 20 20 20 61 64 64 71 2e | 77 20 20 20 20 20 20 23 | addq.|w #|
|00002bd0| 34 2c 20 61 30 0d 20 20 | 20 20 6d 6f 76 65 2e 6c |4, a0. | move.l|
|00002be0| 20 20 20 20 20 20 28 61 | 30 29 2c 20 64 30 20 20 | (a|0), d0 |
|00002bf0| 20 20 20 20 20 20 2f 2f | 20 7a 63 62 46 72 65 65 | //| zcbFree|
|00002c00| 0d 20 20 20 20 73 75 62 | 2e 6c 20 20 20 20 20 20 |. sub|.l |
|00002c10| 20 23 31 30 32 34 30 2c | 20 64 30 20 20 20 20 20 | #10240,| d0 |
|00002c20| 20 2f 2f 20 72 65 73 65 | 72 76 65 20 66 6f 72 20 | // rese|rve for |
|00002c30| 65 6d 65 72 67 65 6e 63 | 69 65 73 0d 20 20 20 20 |emergenc|ies. |
|00002c40| 63 6d 70 2e 6c 20 20 20 | 20 20 20 20 64 33 2c 20 |cmp.l | d3, |
|00002c50| 64 30 0d 20 20 20 20 62 | 6c 74 20 20 20 20 20 20 |d0. b|lt |
|00002c60| 20 20 20 40 34 0d 2a 2f | 0d 40 36 3a 20 2f 2f 20 | @4.*/|.@6: // |
|00002c70| 43 61 6c 6c 20 6f 72 69 | 67 69 6e 61 6c 20 4e 65 |Call ori|ginal Ne|
|00002c80| 77 48 61 6e 64 6c 65 0d | 20 20 20 20 6d 6f 76 65 |wHandle.| move|
|00002c90| 2e 6c 20 20 20 20 20 20 | 64 33 2c 20 64 30 0d 20 |.l |d3, d0. |
|00002ca0| 20 20 20 2f 2f 20 52 65 | 73 74 6f 72 65 20 64 31 | // Re|store d1|
|00002cb0| 20 28 74 72 61 70 57 6f | 72 64 29 0d 20 20 20 20 | (trapWo|rd). |
|00002cc0| 6d 6f 76 65 2e 77 20 20 | 20 20 20 20 64 34 2c 20 |move.w | d4, |
|00002cd0| 64 31 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |d1. m|ove.l |
|00002ce0| 20 20 20 67 61 74 54 72 | 61 70 73 20 2b 20 28 6b | gatTr|aps + (k|
|00002cf0| 74 72 4e 65 77 48 61 6e | 64 6c 65 20 2a 20 34 29 |trNewHan|dle * 4)|
|00002d00| 2c 20 61 30 0d 20 20 20 | 20 6a 73 72 20 20 20 20 |, a0. | jsr |
|00002d10| 20 20 20 20 20 28 61 30 | 29 0d 20 20 20 20 74 73 | (a0|). ts|
|00002d20| 74 2e 77 20 20 20 20 20 | 20 20 64 30 0d 20 20 20 |t.w | d0. |
|00002d30| 20 62 65 71 20 20 20 20 | 20 20 20 20 20 40 32 0d | beq | @2.|
|00002d40| 0d 40 34 3a 20 2f 2f 20 | 5f 44 65 62 75 67 67 65 |.@4: // |_Debugge|
|00002d50| 72 0d 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |r.. m|ove.l |
|00002d60| 20 20 20 64 33 2c 20 2d | 28 73 70 29 0d 20 20 20 | d3, -|(sp). |
|00002d70| 20 6d 6f 76 65 2e 77 20 | 20 20 20 20 20 64 34 2c | move.w | d4,|
|00002d80| 20 2d 28 73 70 29 0d 20 | 20 20 20 6a 73 72 20 20 | -(sp). | jsr |
|00002d90| 20 20 20 20 20 20 20 74 | 70 4e 65 77 48 61 6e 64 | t|pNewHand|
|00002da0| 6c 65 58 0d 20 20 20 20 | 61 64 64 71 2e 77 20 20 |leX. |addq.w |
|00002db0| 20 20 20 20 23 36 2c 20 | 73 70 0d 0d 40 33 3a 20 | #6, |sp..@3: |
|00002dc0| 6d 6f 76 65 2e 77 20 20 | 20 20 20 20 6b 6f 73 4d |move.w | kosM|
|00002dd0| 65 6d 45 72 72 2c 20 64 | 30 0d 0d 40 32 3a 20 6d |emErr, d|0..@2: m|
|00002de0| 6f 76 65 6d 2e 6c 20 20 | 20 20 20 28 73 70 29 2b |ovem.l | (sp)+|
|00002df0| 2c 20 64 31 2d 64 34 2f | 61 31 2d 61 34 20 20 2f |, d1-d4/|a1-a4 /|
|00002e00| 2f 20 52 65 73 74 6f 72 | 65 73 20 41 34 0d 40 31 |/ Restor|es A4.@1|
|00002e10| 3a 20 72 74 73 0d 20 7d | 0d 0d 0d 0d 73 74 61 74 |: rts. }|....stat|
|00002e20| 69 63 20 70 61 73 63 61 | 6c 20 61 73 6d 20 76 6f |ic pasca|l asm vo|
|00002e30| 69 64 20 78 61 4e 65 77 | 48 61 6e 64 6c 65 53 6d |id xaNew|HandleSm|
|00002e40| 61 72 74 28 76 6f 69 64 | 29 20 20 20 2f 2f 20 50 |art(void|) // P|
|00002e50| 61 72 61 6d 65 74 65 72 | 20 69 6e 20 72 65 67 69 |arameter| in regi|
|00002e60| 73 74 65 72 20 64 30 2c | 20 74 72 61 70 57 6f 72 |ster d0,| trapWor|
|00002e70| 64 20 69 6e 20 64 31 0d | 20 7b 0d 20 20 20 20 6d |d in d1.| {. m|
|00002e80| 6f 76 65 6d 2e 6c 20 20 | 20 20 20 64 31 2d 64 34 |ovem.l | d1-d4|
|00002e90| 2f 61 31 2d 61 34 2c 20 | 2d 28 73 70 29 0d 0d 20 |/a1-a4, |-(sp).. |
|00002ea0| 20 20 20 6d 6f 76 65 2e | 6c 20 20 20 20 20 20 64 | move.|l d|
|00002eb0| 30 2c 20 64 33 0d 20 20 | 20 20 6d 6f 76 65 2e 77 |0, d3. | move.w|
|00002ec0| 20 20 20 20 20 20 64 31 | 2c 20 64 34 0d 0d 20 20 | d1|, d4.. |
|00002ed0| 20 20 2f 2f 20 41 63 63 | 65 73 73 20 74 6f 20 6f | // Acc|ess to o|
|00002ee0| 75 72 20 67 6c 6f 62 61 | 6c 73 0d 20 20 20 20 6a |ur globa|ls. j|
|00002ef0| 73 72 20 20 20 20 20 20 | 20 20 20 53 65 74 43 75 |sr | SetCu|
|00002f00| 72 72 65 6e 74 41 34 0d | 0d 20 20 20 20 2f 2f 20 |rrentA4.|. // |
|00002f10| 49 6e 20 53 79 73 74 65 | 6d 20 48 65 61 70 20 2d |In Syste|m Heap -|
|00002f20| 20 4c 65 61 76 65 20 69 | 74 20 61 6c 6f 6e 65 0d | Leave i|t alone.|
|00002f30| 20 20 20 20 62 74 73 74 | 20 20 20 20 20 20 20 20 | btst| |
|00002f40| 23 62 6f 73 54 72 61 70 | 49 73 53 79 73 42 69 74 |#bosTrap|IsSysBit|
|00002f50| 2c 20 64 34 0d 20 20 20 | 20 62 6e 65 20 20 20 20 |, d4. | bne |
|00002f60| 20 20 20 20 20 40 37 0d | 0d 20 20 20 20 2f 2f 20 | @7.|. // |
|00002f70| 4e 6f 74 20 41 70 70 20 | 5a 6f 6e 65 20 2d 20 6c |Not App |Zone - l|
|00002f80| 65 61 76 65 20 69 74 20 | 61 6c 6f 6e 65 0d 20 20 |eave it |alone. |
|00002f90| 20 20 6d 6f 76 65 2e 6c | 20 20 20 20 20 20 6b 6f | move.l| ko|
|00002fa0| 73 41 70 70 6c 5a 6f 6e | 65 2c 20 64 30 0d 20 20 |sApplZon|e, d0. |
|00002fb0| 20 20 6d 6f 76 65 2e 6c | 20 20 20 20 20 20 6b 6f | move.l| ko|
|00002fc0| 73 54 68 65 5a 6f 6e 65 | 2c 20 64 31 0d 20 20 20 |sTheZone|, d1. |
|00002fd0| 20 63 6d 70 2e 6c 20 20 | 20 20 20 20 20 64 31 2c | cmp.l | d1,|
|00002fe0| 20 64 30 0d 20 20 20 20 | 62 65 71 20 20 20 20 20 | d0. |beq |
|00002ff0| 20 20 20 20 40 36 0d 0d | 40 37 3a 20 2f 2f 20 53 | @6..|@7: // S|
|00003000| 79 73 74 65 6d 20 6f 72 | 20 6f 74 68 65 72 20 7a |ystem or| other z|
|00003010| 6f 6e 65 20 2d 20 6f 75 | 74 20 6f 66 20 68 65 72 |one - ou|t of her|
|00003020| 65 21 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |e!. m|ove.l |
|00003030| 20 20 20 64 33 2c 20 64 | 30 0d 20 20 20 20 6d 6f | d3, d|0. mo|
|00003040| 76 65 2e 6c 20 20 20 20 | 20 20 67 61 74 54 72 61 |ve.l | gatTra|
|00003050| 70 73 20 2b 20 28 6b 74 | 72 4e 65 77 48 61 6e 64 |ps + (kt|rNewHand|
|00003060| 6c 65 20 2a 20 34 29 2c | 20 61 30 0d 20 20 20 20 |le * 4),| a0. |
|00003070| 6d 6f 76 65 6d 2e 6c 20 | 20 20 20 20 28 73 70 29 |movem.l | (sp)|
|00003080| 2b 2c 20 64 31 2d 64 34 | 2f 61 31 2d 61 34 0d 20 |+, d1-d4|/a1-a4. |
|00003090| 20 20 20 6a 6d 70 20 20 | 20 20 20 20 20 20 20 28 | jmp | (|
|000030a0| 61 30 29 0d 0d 40 36 3a | 20 2f 2f 20 48 6f 77 20 |a0)..@6:| // How |
|000030b0| 6d 75 63 68 20 64 6f 20 | 77 65 20 68 61 76 65 20 |much do |we have |
|000030c0| 61 76 61 69 6c 3f 0d 20 | 20 20 20 6d 6f 76 65 2e |avail?. | move.|
|000030d0| 6c 20 20 20 20 20 20 6b | 6f 73 54 68 65 5a 6f 6e |l k|osTheZon|
|000030e0| 65 2c 20 61 30 0d 20 20 | 20 20 61 64 64 71 2e 77 |e, a0. | addq.w|
|000030f0| 20 20 20 20 20 20 23 38 | 2c 20 61 30 0d 20 20 20 | #8|, a0. |
|00003100| 20 61 64 64 71 2e 77 20 | 20 20 20 20 20 23 34 2c | addq.w | #4,|
|00003110| 20 61 30 0d 20 20 20 20 | 6d 6f 76 65 2e 6c 20 20 | a0. |move.l |
|00003120| 20 20 20 20 28 61 30 29 | 2c 20 64 30 20 20 20 20 | (a0)|, d0 |
|00003130| 20 20 20 20 2f 2f 20 7a | 63 62 46 72 65 65 0d 20 | // z|cbFree. |
|00003140| 20 20 20 6d 6f 76 65 2e | 6c 20 20 20 20 20 20 64 | move.|l d|
|00003150| 30 2c 20 64 31 20 20 20 | 20 20 20 20 20 20 20 2f |0, d1 | /|
|00003160| 2f 20 c9 20 74 6f 20 44 | 31 0d 20 20 20 20 61 73 |/ . to D|1. as|
|00003170| 72 2e 6c 20 20 20 20 20 | 20 20 23 32 2c 20 64 30 |r.l | #2, d0|
|00003180| 20 20 20 20 20 20 20 20 | 20 20 2f 2f 20 31 2f 34 | | // 1/4|
|00003190| 20 74 6f 20 44 30 0d 0d | 20 20 20 20 2f 2f 20 51 | to D0..| // Q|
|000031a0| 75 69 63 6b 20 43 68 65 | 63 6b 20 69 66 20 74 68 |uick Che|ck if th|
|000031b0| 61 74 20 6d 75 63 68 20 | 69 73 20 66 72 65 65 0d |at much |is free.|
|000031c0| 20 20 20 20 63 6d 70 2e | 6c 20 20 20 20 20 20 20 | cmp.|l |
|000031d0| 64 33 2c 20 64 30 20 20 | 20 20 20 20 20 20 20 20 |d3, d0 | |
|000031e0| 2f 2f 20 64 30 20 28 66 | 72 65 65 20 3e 3e 20 32 |// d0 (f|ree >> 2|
|000031f0| 29 20 3e 20 64 33 20 28 | 61 6d 74 29 20 3f 0d 20 |) > d3 (|amt) ?. |
|00003200| 20 20 20 62 6c 65 20 20 | 20 20 20 20 20 20 20 40 | ble | @|
|00003210| 35 0d 0d 20 20 20 20 2f | 2f 20 46 72 6f 6d 20 4f |5.. /|/ From O|
|00003220| 70 65 6e 50 69 63 74 75 | 72 65 28 29 3f 0d 20 20 |penPictu|re()?. |
|00003230| 20 20 6d 6f 76 65 2e 77 | 20 20 20 20 20 20 67 72 | move.w| gr|
|00003240| 70 2e 66 6c 61 67 73 2c | 20 64 30 0d 20 20 20 20 |p.flags,| d0. |
|00003250| 62 74 73 74 20 20 20 20 | 20 20 20 20 23 62 72 70 |btst | #brp|
|00003260| 49 6e 4f 70 65 6e 50 69 | 63 74 75 72 65 42 69 74 |InOpenPi|ctureBit|
|00003270| 2c 20 64 30 0d 20 20 20 | 20 62 65 71 20 20 20 20 |, d0. | beq |
|00003280| 20 20 20 20 20 40 30 20 | 20 20 20 20 20 2f 2f 20 | @0 | // |
|00003290| 47 6f 20 66 6f 72 20 74 | 68 65 20 62 69 67 67 65 |Go for t|he bigge|
|000032a0| 72 20 7a 6f 6e 65 0d 0d | 40 35 3a 20 2f 2f 20 43 |r zone..|@5: // C|
|000032b0| 68 65 63 6b 20 69 66 20 | 6d 6f 72 65 20 74 65 6d |heck if |more tem|
|000032c0| 70 20 69 73 20 61 76 61 | 69 6c 61 62 6c 65 20 74 |p is ava|ilable t|
|000032d0| 68 61 6e 20 6f 75 72 20 | 7a 6f 6e 65 0d 2f 2a 0d |han our |zone./*.|
|000032e0| 40 35 3a 20 6d 6f 76 65 | 2e 6c 20 20 20 20 20 20 |@5: move|.l |
|000032f0| 67 72 70 2e 74 6d 70 5a | 6f 6e 65 2c 20 61 30 0d |grp.tmpZ|one, a0.|
|00003300| 20 20 20 20 61 64 64 71 | 2e 77 20 20 20 20 20 20 | addq|.w |
|00003310| 23 38 2c 20 61 30 0d 20 | 20 20 20 61 64 64 71 2e |#8, a0. | addq.|
|00003320| 77 20 20 20 20 20 20 23 | 34 2c 20 61 30 0d 20 20 |w #|4, a0. |
|00003330| 20 20 6d 6f 76 65 2e 6c | 20 20 20 20 20 20 28 61 | move.l| (a|
|00003340| 30 29 2c 20 64 30 0d 2a | 2f 0d 20 20 20 20 6d 6f |0), d0.*|/. mo|
|00003350| 76 65 2e 6c 20 20 20 20 | 20 20 64 31 2c 20 61 33 |ve.l | d1, a3|
|00003360| 0d 20 20 20 20 73 75 62 | 71 2e 77 20 20 20 20 20 |. sub|q.w |
|00003370| 20 23 34 2c 20 73 70 0d | 20 20 20 20 6d 6f 76 65 | #4, sp.| move|
|00003380| 71 20 20 20 20 20 20 20 | 23 30 78 31 38 2c 20 64 |q |#0x18, d|
|00003390| 30 20 20 20 20 20 20 20 | 20 20 20 20 2f 2f 20 5f |0 | // _|
|000033a0| 54 65 6d 70 46 72 65 65 | 4d 65 6d 0d 20 20 20 20 |TempFree|Mem. |
|000033b0| 6d 6f 76 65 2e 77 20 20 | 20 20 20 20 64 30 2c 20 |move.w | d0, |
|000033c0| 2d 28 73 70 29 0d 20 20 | 20 20 5f 4f 53 44 69 73 |-(sp). | _OSDis|
|000033d0| 70 61 74 63 68 0d 20 20 | 20 20 6d 6f 76 65 2e 6c |patch. | move.l|
|000033e0| 20 20 20 20 20 20 28 73 | 70 29 2b 2c 20 64 30 0d | (s|p)+, d0.|
|000033f0| 20 20 20 20 6d 6f 76 65 | 2e 6c 20 20 20 20 20 20 | move|.l |
|00003400| 61 33 2c 20 64 31 0d 20 | 20 20 20 63 6d 70 2e 6c |a3, d1. | cmp.l|
|00003410| 20 20 20 20 20 20 20 64 | 30 2c 20 64 31 20 20 20 | d|0, d1 |
|00003420| 20 20 20 20 20 20 20 2f | 2f 20 44 31 20 28 61 70 | /|/ D1 (ap|
|00003430| 70 29 20 3e 20 44 30 20 | 28 74 6d 70 29 20 3f 0d |p) > D0 |(tmp) ?.|
|00003440| 20 20 20 20 62 67 74 20 | 20 20 20 20 20 20 20 20 | bgt | |
|00003450| 40 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |@0 | |
|00003460| 2f 2f 20 53 6b 69 70 20 | 69 74 2c 20 61 70 70 20 |// Skip |it, app |
|00003470| 68 61 73 20 6d 6f 72 65 | 0d 0d 20 20 20 20 2f 2f |has more|.. //|
|00003480| 20 47 65 74 20 73 6f 6d | 65 20 74 65 6d 70 20 6d | Get som|e temp m|
|00003490| 65 6d 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |em. m|ove.l |
|000034a0| 20 20 20 64 33 2c 20 2d | 28 73 70 29 0d 20 20 20 | d3, -|(sp). |
|000034b0| 20 6d 6f 76 65 2e 77 20 | 20 20 20 20 20 64 34 2c | move.w | d4,|
|000034c0| 20 2d 28 73 70 29 0d 20 | 20 20 20 6a 73 72 20 20 | -(sp). | jsr |
|000034d0| 20 20 20 20 20 20 20 74 | 70 4e 65 77 48 61 6e 64 | t|pNewHand|
|000034e0| 6c 65 58 0d 20 20 20 20 | 61 64 64 71 2e 77 20 20 |leX. |addq.w |
|000034f0| 20 20 20 20 23 36 2c 20 | 73 70 0d 20 20 20 20 74 | #6, |sp. t|
|00003500| 73 74 2e 77 20 20 20 20 | 20 20 20 6b 6f 73 4d 65 |st.w | kosMe|
|00003510| 6d 45 72 72 0d 20 20 20 | 20 62 65 71 20 20 20 20 |mErr. | beq |
|00003520| 20 20 20 20 20 40 33 0d | 0d 20 20 20 20 2f 2f 20 | @3.|. // |
|00003530| 43 61 6c 6c 20 6f 72 69 | 67 69 6e 61 6c 20 4e 65 |Call ori|ginal Ne|
|00003540| 77 48 61 6e 64 6c 65 0d | 40 30 3a 20 6d 6f 76 65 |wHandle.|@0: move|
|00003550| 2e 6c 20 20 20 20 20 20 | 64 33 2c 20 64 30 0d 20 |.l |d3, d0. |
|00003560| 20 20 20 2f 2f 20 52 65 | 73 74 6f 72 65 20 64 31 | // Re|store d1|
|00003570| 20 28 74 72 61 70 57 6f | 72 64 29 0d 20 20 20 20 | (trapWo|rd). |
|00003580| 6d 6f 76 65 2e 77 20 20 | 20 20 20 20 64 34 2c 20 |move.w | d4, |
|00003590| 64 31 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |d1. m|ove.l |
|000035a0| 20 20 20 67 61 74 54 72 | 61 70 73 20 2b 20 28 6b | gatTr|aps + (k|
|000035b0| 74 72 4e 65 77 48 61 6e | 64 6c 65 20 2a 20 34 29 |trNewHan|dle * 4)|
|000035c0| 2c 20 61 30 0d 20 20 20 | 20 6a 73 72 20 20 20 20 |, a0. | jsr |
|000035d0| 20 20 20 20 20 28 61 30 | 29 0d 20 20 20 20 74 73 | (a0|). ts|
|000035e0| 74 2e 77 20 20 20 20 20 | 20 20 64 30 0d 20 20 20 |t.w | d0. |
|000035f0| 20 62 65 71 20 20 20 20 | 20 20 20 20 20 40 32 0d | beq | @2.|
|00003600| 0d 40 34 3a 20 2f 2f 20 | 5f 44 65 62 75 67 67 65 |.@4: // |_Debugge|
|00003610| 72 0d 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |r.. m|ove.l |
|00003620| 20 20 20 64 33 2c 20 2d | 28 73 70 29 0d 20 20 20 | d3, -|(sp). |
|00003630| 20 6d 6f 76 65 2e 77 20 | 20 20 20 20 20 64 34 2c | move.w | d4,|
|00003640| 20 2d 28 73 70 29 0d 20 | 20 20 20 6a 73 72 20 20 | -(sp). | jsr |
|00003650| 20 20 20 20 20 20 20 74 | 70 4e 65 77 48 61 6e 64 | t|pNewHand|
|00003660| 6c 65 58 0d 20 20 20 20 | 61 64 64 71 2e 77 20 20 |leX. |addq.w |
|00003670| 20 20 20 20 23 36 2c 20 | 73 70 0d 0d 40 33 3a 20 | #6, |sp..@3: |
|00003680| 6d 6f 76 65 2e 77 20 20 | 20 20 20 20 6b 6f 73 4d |move.w | kosM|
|00003690| 65 6d 45 72 72 2c 20 64 | 30 0d 0d 40 32 3a 20 6d |emErr, d|0..@2: m|
|000036a0| 6f 76 65 6d 2e 6c 20 20 | 20 20 20 28 73 70 29 2b |ovem.l | (sp)+|
|000036b0| 2c 20 64 31 2d 64 34 2f | 61 31 2d 61 34 20 20 2f |, d1-d4/|a1-a4 /|
|000036c0| 2f 20 52 65 73 74 6f 72 | 65 73 20 41 34 0d 40 31 |/ Restor|es A4.@1|
|000036d0| 3a 20 72 74 73 0d 20 7d | 0d 0d 23 65 6e 64 69 66 |: rts. }|..#endif|
|000036e0| 20 20 2f 2f 20 20 49 53 | 41 50 50 43 0d 0d 0d 0d | // IS|APPC....|
|000036f0| 0d 0d 0d 73 74 61 74 69 | 63 20 50 74 72 20 74 70 |...stati|c Ptr tp|
|00003700| 4e 65 77 50 74 72 58 28 | 77 6f 72 64 20 74 77 2c |NewPtrX(|word tw,|
|00003710| 20 53 69 7a 65 20 61 6d | 74 29 0d 20 7b 0d 20 2f | Size am|t). {. /|
|00003720| 2a 20 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |* ......|........|
|00003730| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003740| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003750| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 0d 20 20 20 |........|..... |
|00003760| 20 74 70 20 54 72 61 70 | 20 4e 65 77 50 74 72 58 | tp Trap| NewPtrX|
|00003770| 0d 20 20 20 20 0d 20 20 | 20 20 49 6e 20 20 20 20 |. . | In |
|00003780| 20 20 0d 20 20 20 20 4f | 75 74 20 20 20 20 20 0d | . O|ut .|
|00003790| 20 20 20 20 45 72 72 6f | 72 73 20 20 0d 20 20 20 | Erro|rs . |
|000037a0| 20 45 66 66 65 63 74 20 | 20 52 65 70 6c 61 63 65 | Effect | Replace|
|000037b0| 20 6b 6e 6f 77 6e 20 6e | 61 6d 65 73 20 77 69 74 | known n|ames wit|
|000037c0| 68 20 69 63 6f 6e 20 73 | 75 69 74 65 73 0d 20 20 |h icon s|uites. |
|000037d0| 20 20 43 6f 6e 73 74 20 | 20 20 0d 20 20 20 20 47 | Const | . G|
|000037e0| 6c 6f 62 61 6c 20 20 0d | 20 20 20 20 52 73 72 63 |lobal .| Rsrc|
|000037f0| 20 20 20 20 0d 20 20 20 | 20 4e 6f 74 65 73 20 20 | . | Notes |
|00003800| 20 0d 20 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 | . .....|........|
|00003810| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003820| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003830| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 20 2a |........|...... *|
|00003840| 2f 0d 20 20 20 20 45 6e | 74 65 72 43 6f 64 65 52 |/. En|terCodeR|
|00003850| 73 72 63 28 29 3b 0d 0d | 20 20 20 20 50 74 72 20 |src();..| Ptr |
|00003860| 20 20 20 20 20 20 20 20 | 20 20 20 20 70 3b 0d 0d | | p;..|
|00003870| 23 69 66 20 20 20 20 20 | 20 20 20 20 49 53 41 50 |#if | ISAP|
|00003880| 50 43 0d 20 20 20 20 69 | 66 20 28 21 28 70 20 3d |PC. i|f (!(p =|
|00003890| 20 28 50 74 72 29 43 61 | 6c 6c 4f 53 54 72 61 70 | (Ptr)Ca|llOSTrap|
|000038a0| 55 6e 69 76 65 72 73 61 | 6c 50 72 6f 63 28 67 61 |Universa|lProc(ga|
|000038b0| 74 54 72 61 70 73 5b 6b | 74 72 4e 65 77 50 74 72 |tTraps[k|trNewPtr|
|000038c0| 5d 2c 20 62 70 69 4e 65 | 77 50 74 72 2c 20 74 77 |], bpiNe|wPtr, tw|
|000038d0| 2c 20 61 6d 74 29 29 29 | 0d 23 65 6c 73 65 20 20 |, amt)))|.#else |
|000038e0| 20 2f 2f 20 20 49 53 41 | 50 50 43 0d 20 20 20 20 | // ISA|PPC. |
|000038f0| 69 66 20 28 21 28 70 20 | 3d 20 28 50 74 72 29 28 |if (!(p |= (Ptr)(|
|00003900| 2a 28 74 72 61 70 4e 65 | 77 50 74 72 50 72 6f 63 |*(trapNe|wPtrProc|
|00003910| 29 67 61 74 54 72 61 70 | 73 5b 6b 74 72 4e 65 77 |)gatTrap|s[ktrNew|
|00003920| 50 74 72 5d 29 28 74 77 | 2c 20 61 6d 74 29 29 29 |Ptr])(tw|, amt)))|
|00003930| 0d 23 65 6e 64 69 66 20 | 20 2f 2f 20 20 49 53 41 |.#endif | // ISA|
|00003940| 50 50 43 0d 20 20 20 20 | 20 7b 0d 20 20 20 20 20 |PPC. | {. |
|00003950| 20 20 20 2f 2f 20 54 72 | 79 20 73 79 73 74 65 6d | // Tr|y system|
|00003960| 20 68 65 61 70 20 69 66 | 20 77 65 20 6e 6f 74 20 | heap if| we not |
|00003970| 61 6c 72 65 61 64 79 20 | 69 6e 20 53 79 73 74 65 |already |in Syste|
|00003980| 6d 20 68 65 61 70 c9 0d | 20 20 20 20 20 20 20 20 |m heap..| |
|00003990| 69 66 20 28 21 28 74 77 | 20 26 20 62 6f 73 54 72 |if (!(tw| & bosTr|
|000039a0| 61 70 49 73 53 79 73 29 | 29 0d 23 69 66 20 20 20 |apIsSys)|).#if |
|000039b0| 20 20 20 20 20 20 49 53 | 41 50 50 43 0d 20 20 20 | IS|APPC. |
|000039c0| 20 20 20 20 20 20 20 20 | 20 70 20 3d 20 28 50 74 | | p = (Pt|
|000039d0| 72 29 43 61 6c 6c 4f 53 | 54 72 61 70 55 6e 69 76 |r)CallOS|TrapUniv|
|000039e0| 65 72 73 61 6c 50 72 6f | 63 28 67 61 74 54 72 61 |ersalPro|c(gatTra|
|000039f0| 70 73 5b 6b 74 72 4e 65 | 77 50 74 72 5d 2c 20 62 |ps[ktrNe|wPtr], b|
|00003a00| 70 69 4e 65 77 50 74 72 | 2c 20 74 77 20 7c 20 62 |piNewPtr|, tw | b|
|00003a10| 6f 73 54 72 61 70 49 73 | 53 79 73 2c 20 61 6d 74 |osTrapIs|Sys, amt|
|00003a20| 29 3b 0d 23 65 6c 73 65 | 20 20 20 2f 2f 20 20 49 |);.#else| // I|
|00003a30| 53 41 50 50 43 0d 20 20 | 20 20 20 20 20 20 20 20 |SAPPC. | |
|00003a40| 20 20 70 20 3d 20 28 50 | 74 72 29 28 2a 28 74 72 | p = (P|tr)(*(tr|
|00003a50| 61 70 4e 65 77 50 74 72 | 50 72 6f 63 29 67 61 74 |apNewPtr|Proc)gat|
|00003a60| 54 72 61 70 73 5b 6b 74 | 72 4e 65 77 50 74 72 5d |Traps[kt|rNewPtr]|
|00003a70| 29 28 74 77 20 7c 20 62 | 6f 73 54 72 61 70 49 73 |)(tw | b|osTrapIs|
|00003a80| 53 79 73 2c 20 61 6d 74 | 29 3b 0d 23 65 6e 64 69 |Sys, amt|);.#endi|
|00003a90| 66 20 20 2f 2f 20 20 49 | 53 41 50 50 43 0d 0d 20 |f // I|SAPPC.. |
|00003aa0| 20 20 20 20 20 20 20 69 | 66 20 28 21 70 29 0d 20 | i|f (!p). |
|00003ab0| 20 20 20 20 20 20 20 20 | 7b 0d 20 20 20 20 20 20 | |{. |
|00003ac0| 20 20 20 20 20 20 48 61 | 6e 64 6c 65 20 20 20 20 | Ha|ndle |
|00003ad0| 20 20 68 3b 0d 0d 20 20 | 20 20 20 20 20 20 20 20 | h;.. | |
|00003ae0| 20 20 69 66 20 28 68 20 | 3d 20 74 70 4e 65 77 48 | if (h |= tpNewH|
|00003af0| 61 6e 64 6c 65 58 28 74 | 77 2c 20 61 6d 74 20 2b |andleX(t|w, amt +|
|00003b00| 20 31 32 29 29 0d 20 20 | 20 20 20 20 20 20 20 20 | 12)). | |
|00003b10| 20 20 20 7b 0d 20 20 20 | 20 20 20 20 20 20 20 20 | {. | |
|00003b20| 20 20 20 20 20 69 64 65 | 6e 74 20 20 20 20 20 20 | ide|nt |
|00003b30| 20 2a 20 69 64 3b 0d 0d | 20 20 20 20 20 20 20 20 | * id;..| |
|00003b40| 20 20 20 20 20 20 20 20 | 6d 6d 48 64 6c 4c 6f 63 | |mmHdlLoc|
|00003b50| 6b 28 68 29 3b 0d 20 20 | 20 20 20 20 20 20 20 20 |k(h);. | |
|00003b60| 20 20 20 20 20 20 69 64 | 20 3d 20 28 69 64 65 6e | id| = (iden|
|00003b70| 74 20 2a 29 2a 68 3b 0d | 20 20 20 20 20 20 20 20 |t *)*h;.| |
|00003b80| 20 20 20 20 20 20 20 20 | 2a 69 64 2b 2b 20 3d 20 | |*id++ = |
|00003b90| 69 67 73 52 65 61 70 65 | 72 3b 20 20 2f 2f 20 4d |igsReape|r; // M|
|00003ba0| 61 72 6b 20 61 73 20 61 | 20 70 6f 69 6e 74 65 72 |ark as a| pointer|
|00003bb0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00003bc0| 20 2a 69 64 2b 2b 20 3d | 20 27 50 74 72 20 27 3b | *id++ =| 'Ptr ';|
|00003bd0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00003be0| 20 2a 69 64 2b 2b 20 3d | 20 28 6c 77 72 64 29 68 | *id++ =| (lwrd)h|
|00003bf0| 3b 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;. | |
|00003c00| 20 20 70 20 3d 20 28 50 | 74 72 29 69 64 3b 0d 20 | p = (P|tr)id;. |
|00003c10| 20 20 20 20 20 20 20 20 | 20 20 20 20 7d 0d 20 20 | | }. |
|00003c20| 20 20 20 20 20 20 20 7d | 0d 20 20 20 20 20 7d 0d | }|. }.|
|00003c30| 0d 20 20 20 20 4c 65 61 | 76 65 43 6f 64 65 52 73 |. Lea|veCodeRs|
|00003c40| 72 63 28 29 3b 0d 0d 20 | 20 20 20 72 65 74 75 72 |rc();.. | retur|
|00003c50| 6e 20 20 70 3b 0d 20 7d | 0d 0d 0d 2f 2f 20 47 4c |n p;. }|...// GL|
|00003c60| 55 45 20 43 6f 64 65 20 | 66 6f 72 20 74 70 4e 65 |UE Code |for tpNe|
|00003c70| 77 50 74 72 0d 23 69 66 | 20 20 20 20 20 49 53 41 |wPtr.#if| ISA|
|00003c80| 50 50 43 0d 0d 73 74 61 | 74 69 63 20 52 6f 75 74 |PPC..sta|tic Rout|
|00003c90| 69 6e 65 44 65 73 63 72 | 69 70 74 6f 72 20 78 61 |ineDescr|iptor xa|
|00003ca0| 4e 65 77 50 74 72 20 3d | 20 42 55 49 4c 44 5f 52 |NewPtr =| BUILD_R|
|00003cb0| 4f 55 54 49 4e 45 5f 44 | 45 53 43 52 49 50 54 4f |OUTINE_D|ESCRIPTO|
|00003cc0| 52 28 62 70 69 4e 65 77 | 50 74 72 2c 20 78 61 4e |R(bpiNew|Ptr, xaN|
|00003cd0| 65 77 50 74 72 50 50 43 | 29 3b 0d 0d 73 74 61 74 |ewPtrPPC|);..stat|
|00003ce0| 69 63 20 70 61 73 63 61 | 6c 20 50 74 72 20 78 61 |ic pasca|l Ptr xa|
|00003cf0| 4e 65 77 50 74 72 50 50 | 43 28 77 6f 72 64 20 74 |NewPtrPP|C(word t|
|00003d00| 77 2c 20 53 69 7a 65 20 | 61 6d 74 29 0d 20 7b 0d |w, Size |amt). {.|
|00003d10| 20 20 20 20 72 65 74 75 | 72 6e 20 20 74 70 4e 65 | retu|rn tpNe|
|00003d20| 77 50 74 72 58 28 74 77 | 2c 20 61 6d 74 29 3b 0d |wPtrX(tw|, amt);.|
|00003d30| 20 7d 0d 0d 23 65 6c 73 | 65 0d 0d 73 74 61 74 69 | }..#els|e..stati|
|00003d40| 63 20 70 61 73 63 61 6c | 20 61 73 6d 20 76 6f 69 |c pascal| asm voi|
|00003d50| 64 20 78 61 4e 65 77 50 | 74 72 28 76 6f 69 64 29 |d xaNewP|tr(void)|
|00003d60| 20 20 20 2f 2f 20 50 61 | 72 61 6d 65 74 65 72 20 | // Pa|rameter |
|00003d70| 69 6e 20 72 65 67 69 73 | 74 65 72 20 64 30 0d 20 |in regis|ter d0. |
|00003d80| 7b 0d 20 20 20 20 6d 6f | 76 65 6d 2e 6c 20 20 20 |{. mo|vem.l |
|00003d90| 20 20 64 31 2d 64 32 2f | 61 31 2c 20 2d 28 73 70 | d1-d2/|a1, -(sp|
|00003da0| 29 0d 0d 20 20 20 20 6d | 6f 76 65 2e 6c 20 20 20 |).. m|ove.l |
|00003db0| 20 20 20 64 30 2c 20 2d | 28 73 70 29 0d 20 20 20 | d0, -|(sp). |
|00003dc0| 20 6d 6f 76 65 2e 77 20 | 20 20 20 20 20 64 31 2c | move.w | d1,|
|00003dd0| 20 2d 28 73 70 29 0d 0d | 20 20 20 20 6a 73 72 20 | -(sp)..| jsr |
|00003de0| 20 20 20 20 20 20 20 20 | 74 70 4e 65 77 50 74 72 | |tpNewPtr|
|00003df0| 58 0d 0d 20 20 20 20 61 | 64 64 71 2e 77 20 20 20 |X.. a|ddq.w |
|00003e00| 20 20 20 23 36 2c 20 73 | 70 0d 20 20 20 20 6d 6f | #6, s|p. mo|
|00003e10| 76 65 2e 77 20 20 20 20 | 20 20 6b 6f 73 4d 65 6d |ve.w | kosMem|
|00003e20| 45 72 72 2c 20 64 30 0d | 20 20 20 20 6d 6f 76 65 |Err, d0.| move|
|00003e30| 6d 2e 6c 20 20 20 20 20 | 28 73 70 29 2b 2c 20 64 |m.l |(sp)+, d|
|00003e40| 31 2d 64 32 2f 61 31 0d | 20 20 20 20 72 74 73 0d |1-d2/a1.| rts.|
|00003e50| 20 7d 0d 0d 23 65 6e 64 | 69 66 20 20 2f 2f 20 20 | }..#end|if // |
|00003e60| 49 53 41 50 50 43 0d 0d | 0d 0d 0d 0d 0d 73 74 61 |ISAPPC..|.....sta|
|00003e70| 74 69 63 20 53 79 73 50 | 72 6f 63 20 74 70 44 69 |tic SysP|roc tpDi|
|00003e80| 73 70 6f 73 65 50 74 72 | 58 28 77 6f 72 64 20 74 |sposePtr|X(word t|
|00003e90| 77 2c 20 50 74 72 20 70 | 29 0d 20 7b 0d 20 2f 2a |w, Ptr p|). {. /*|
|00003ea0| 20 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 | .......|........|
|00003eb0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003ec0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003ed0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 0d 20 20 20 20 |........|.... |
|00003ee0| 74 70 20 54 72 61 70 20 | 44 69 73 70 6f 73 65 50 |tp Trap |DisposeP|
|00003ef0| 74 72 58 0d 20 20 20 20 | 0d 20 20 20 20 49 6e 20 |trX. |. In |
|00003f00| 20 20 20 20 20 0d 20 20 | 20 20 4f 75 74 20 20 20 | . | Out |
|00003f10| 20 20 0d 20 20 20 20 45 | 72 72 6f 72 73 20 20 0d | . E|rrors .|
|00003f20| 20 20 20 20 45 66 66 65 | 63 74 20 20 52 65 70 6c | Effe|ct Repl|
|00003f30| 61 63 65 20 6b 6e 6f 77 | 6e 20 6e 61 6d 65 73 20 |ace know|n names |
|00003f40| 77 69 74 68 20 69 63 6f | 6e 20 73 75 69 74 65 73 |with ico|n suites|
|00003f50| 0d 20 20 20 20 43 6f 6e | 73 74 20 20 20 0d 20 20 |. Con|st . |
|00003f60| 20 20 47 6c 6f 62 61 6c | 20 20 0d 20 20 20 20 52 | Global| . R|
|00003f70| 73 72 63 20 20 20 20 0d | 20 20 20 20 4e 6f 74 65 |src .| Note|
|00003f80| 73 20 20 20 0d 20 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |s . ..|........|
|00003f90| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003fa0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003fb0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00003fc0| d0 20 2a 2f 0d 20 20 20 | 20 45 6e 74 65 72 43 6f |. */. | EnterCo|
|00003fd0| 64 65 52 73 72 63 28 29 | 3b 0d 0d 20 20 20 20 53 |deRsrc()|;.. S|
|00003fe0| 79 73 50 72 6f 63 20 74 | 72 61 70 20 3d 20 67 61 |ysProc t|rap = ga|
|00003ff0| 74 54 72 61 70 73 5b 6b | 74 72 44 69 73 70 6f 73 |tTraps[k|trDispos|
|00004000| 65 50 74 72 5d 3b 0d 0d | 20 20 20 20 2f 2f 20 4f |ePtr];..| // O|
|00004010| 6e 65 20 6f 66 20 6f 75 | 72 20 70 73 65 75 64 6f |ne of ou|r pseudo|
|00004020| 20 70 6f 69 6e 74 65 72 | 73 3f 0d 20 20 20 20 69 | pointer|s?. i|
|00004030| 66 20 28 21 70 29 0d 20 | 20 20 20 20 7b 0d 20 20 |f (!p). | {. |
|00004040| 20 20 20 20 20 20 74 72 | 61 70 20 3d 20 4e 55 4c | tr|ap = NUL|
|00004050| 4c 3b 0d 20 20 20 20 20 | 20 20 20 6f 73 4d 65 6d |L;. | osMem|
|00004060| 45 72 72 20 3d 20 30 3b | 0d 20 20 20 20 20 7d 0d |Err = 0;|. }.|
|00004070| 20 20 20 20 65 6c 73 65 | 20 69 66 20 28 20 20 28 | else| if ( (|
|00004080| 2a 28 69 64 65 6e 74 20 | 2a 29 28 70 20 2d 20 38 |*(ident |*)(p - 8|
|00004090| 29 20 3d 3d 20 27 50 74 | 72 20 27 29 0d 20 20 20 |) == 'Pt|r '). |
|000040a0| 20 20 20 20 20 20 20 20 | 20 26 26 20 28 2a 28 69 | | && (*(i|
|000040b0| 64 65 6e 74 20 2a 29 28 | 70 20 2d 20 31 32 29 20 |dent *)(|p - 12) |
|000040c0| 3d 3d 20 69 67 73 52 65 | 61 70 65 72 29 29 0d 20 |== igsRe|aper)). |
|000040d0| 20 20 20 20 7b 0d 20 20 | 20 20 20 20 20 20 74 72 | {. | tr|
|000040e0| 61 70 20 3d 20 4e 55 4c | 4c 3b 0d 20 20 20 20 20 |ap = NUL|L;. |
|000040f0| 20 20 20 6d 6d 48 64 6c | 44 65 6c 28 2a 28 48 61 | mmHdl|Del(*(Ha|
|00004100| 6e 64 6c 65 20 2a 29 28 | 70 20 2d 20 34 29 29 3b |ndle *)(|p - 4));|
|00004110| 0d 20 20 20 20 20 7d 0d | 0d 20 20 20 20 4c 65 61 |. }.|. Lea|
|00004120| 76 65 43 6f 64 65 52 73 | 72 63 28 29 3b 0d 0d 20 |veCodeRs|rc();.. |
|00004130| 20 20 20 72 65 74 75 72 | 6e 20 20 74 72 61 70 3b | retur|n trap;|
|00004140| 0d 20 7d 0d 0d 0d 2f 2f | 20 47 4c 55 45 20 43 6f |. }...//| GLUE Co|
|00004150| 64 65 20 66 6f 72 20 74 | 70 44 69 73 70 6f 73 65 |de for t|pDispose|
|00004160| 50 74 72 0d 23 69 66 20 | 20 20 20 20 20 20 20 20 |Ptr.#if | |
|00004170| 49 53 41 50 50 43 0d 0d | 73 74 61 74 69 63 20 52 |ISAPPC..|static R|
|00004180| 6f 75 74 69 6e 65 44 65 | 73 63 72 69 70 74 6f 72 |outineDe|scriptor|
|00004190| 20 78 61 44 69 73 70 6f | 73 65 50 74 72 20 3d 20 | xaDispo|sePtr = |
|000041a0| 42 55 49 4c 44 5f 52 4f | 55 54 49 4e 45 5f 44 45 |BUILD_RO|UTINE_DE|
|000041b0| 53 43 52 49 50 54 4f 52 | 28 62 70 69 44 69 73 70 |SCRIPTOR|(bpiDisp|
|000041c0| 6f 73 65 50 74 72 2c 20 | 78 61 44 69 73 70 6f 73 |osePtr, |xaDispos|
|000041d0| 65 50 74 72 50 50 43 29 | 3b 0d 0d 73 74 61 74 69 |ePtrPPC)|;..stati|
|000041e0| 63 20 70 61 73 63 61 6c | 20 76 6f 69 64 20 78 61 |c pascal| void xa|
|000041f0| 44 69 73 70 6f 73 65 50 | 74 72 50 50 43 28 77 6f |DisposeP|trPPC(wo|
|00004200| 72 64 20 74 77 2c 20 50 | 74 72 20 70 29 0d 20 7b |rd tw, P|tr p). {|
|00004210| 0d 20 20 20 20 69 66 20 | 28 53 79 73 50 72 6f 63 |. if |(SysProc|
|00004220| 20 74 72 61 70 20 3d 20 | 74 70 44 69 73 70 6f 73 | trap = |tpDispos|
|00004230| 65 50 74 72 58 28 74 77 | 2c 20 70 29 29 0d 20 20 |ePtrX(tw|, p)). |
|00004240| 20 20 20 20 20 20 43 61 | 6c 6c 4f 53 54 72 61 70 | Ca|llOSTrap|
|00004250| 55 6e 69 76 65 72 73 61 | 6c 50 72 6f 63 28 74 72 |Universa|lProc(tr|
|00004260| 61 70 2c 20 62 70 69 44 | 69 73 70 6f 73 65 50 74 |ap, bpiD|isposePt|
|00004270| 72 2c 20 74 77 2c 20 70 | 29 3b 0d 20 7d 0d 0d 23 |r, tw, p|);. }..#|
|00004280| 65 6c 73 65 20 20 20 2f | 2f 20 20 49 53 41 50 50 |else /|/ ISAPP|
|00004290| 43 0d 0d 73 74 61 74 69 | 63 20 70 61 73 63 61 6c |C..stati|c pascal|
|000042a0| 20 61 73 6d 20 76 6f 69 | 64 20 78 61 44 69 73 70 | asm voi|d xaDisp|
|000042b0| 6f 73 65 50 74 72 28 76 | 6f 69 64 29 20 20 20 2f |osePtr(v|oid) /|
|000042c0| 2f 20 50 61 72 61 6d 65 | 74 65 72 20 69 6e 20 72 |/ Parame|ter in r|
|000042d0| 65 67 69 73 74 65 72 20 | 61 30 0d 20 7b 0d 20 20 |egister |a0. {. |
|000042e0| 20 20 6d 6f 76 65 6d 2e | 6c 20 20 20 20 20 64 31 | movem.|l d1|
|000042f0| 2d 64 32 2f 61 31 2c 20 | 2d 28 73 70 29 0d 0d 20 |-d2/a1, |-(sp).. |
|00004300| 20 20 20 6d 6f 76 65 2e | 6c 20 20 20 20 20 20 61 | move.|l a|
|00004310| 30 2c 20 2d 28 73 70 29 | 0d 20 20 20 20 6d 6f 76 |0, -(sp)|. mov|
|00004320| 65 2e 77 20 20 20 20 20 | 20 64 31 2c 20 2d 28 73 |e.w | d1, -(s|
|00004330| 70 29 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |p) | |
|00004340| 20 2f 2f 20 54 72 61 70 | 77 6f 72 64 0d 0d 20 20 | // Trap|word.. |
|00004350| 20 20 6a 73 72 20 20 20 | 20 20 20 20 20 20 74 70 | jsr | tp|
|00004360| 44 69 73 70 6f 73 65 50 | 74 72 58 0d 0d 20 20 20 |DisposeP|trX.. |
|00004370| 20 61 64 64 71 2e 77 20 | 20 20 20 20 20 23 32 2c | addq.w | #2,|
|00004380| 20 73 70 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | sp | |
|00004390| 20 20 20 20 20 2f 2f 20 | 54 72 61 70 77 6f 72 64 | // |Trapword|
|000043a0| 0d 20 20 20 20 6d 6f 76 | 65 2e 6c 20 20 20 20 20 |. mov|e.l |
|000043b0| 20 61 30 2c 20 64 30 0d | 0d 20 20 20 20 6d 6f 76 | a0, d0.|. mov|
|000043c0| 65 2e 6c 20 20 20 20 20 | 20 28 73 70 29 2b 2c 20 |e.l | (sp)+, |
|000043d0| 61 30 0d 20 20 20 20 6d | 6f 76 65 6d 2e 6c 20 20 |a0. m|ovem.l |
|000043e0| 20 20 20 28 73 70 29 2b | 2c 20 64 31 2d 64 32 2f | (sp)+|, d1-d2/|
|000043f0| 61 31 0d 0d 20 20 20 20 | 62 65 71 2e 73 20 20 20 |a1.. |beq.s |
|00004400| 20 20 20 20 40 31 0d 20 | 20 20 20 6d 6f 76 65 2e | @1. | move.|
|00004410| 6c 20 20 20 20 20 20 64 | 30 2c 20 2d 28 73 70 29 |l d|0, -(sp)|
|00004420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2f | | /|
|00004430| 2f 20 52 65 61 6c 20 74 | 72 61 70 0d 40 31 3a 20 |/ Real t|rap.@1: |
|00004440| 72 74 73 0d 20 7d 0d 0d | 23 65 6e 64 69 66 20 20 |rts. }..|#endif |
|00004450| 2f 2f 20 20 49 53 41 50 | 50 43 0d 0d 0d 0d 0d 0d |// ISAP|PC......|
|00004460| 0d 73 74 61 74 69 63 20 | 50 69 63 48 61 6e 64 6c |.static |PicHandl|
|00004470| 65 20 74 70 4f 70 65 6e | 50 69 63 74 75 72 65 58 |e tpOpen|PictureX|
|00004480| 28 72 65 63 74 20 62 6f | 78 29 0d 20 7b 0d 20 2f |(rect bo|x). {. /|
|00004490| 2a 20 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |* ......|........|
|000044a0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000044b0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000044c0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 0d 20 20 20 |........|..... |
|000044d0| 20 74 70 20 54 72 61 70 | 20 4f 70 65 6e 50 69 63 | tp Trap| OpenPic|
|000044e0| 74 75 72 65 58 0d 20 20 | 20 20 0d 20 20 20 20 49 |tureX. | . I|
|000044f0| 6e 20 20 20 20 20 20 0d | 20 20 20 20 4f 75 74 20 |n .| Out |
|00004500| 20 20 20 20 0d 0d 20 20 | 20 20 45 66 66 65 63 74 | .. | Effect|
|00004510| 20 20 52 65 70 6c 61 63 | 65 20 4e 65 77 48 61 6e | Replac|e NewHan|
|00004520| 64 6c 65 20 61 6e 64 20 | 4e 65 77 50 74 72 20 77 |dle and |NewPtr w|
|00004530| 69 74 68 20 6f 75 72 20 | 76 65 72 73 69 6f 6e 73 |ith our |versions|
|00004540| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 69 66 |. | if|
|00004550| 20 74 68 65 20 61 70 70 | 20 69 73 20 69 6e 20 6f | the app| is in o|
|00004560| 75 72 20 70 72 65 66 73 | 20 72 65 73 6f 75 72 63 |ur prefs| resourc|
|00004570| 65 20 61 6e 64 20 74 68 | 65 0d 20 20 20 20 20 20 |e and th|e. |
|00004580| 20 20 20 20 20 20 20 74 | 72 61 70 73 20 68 61 76 | t|raps hav|
|00004590| 65 20 6e 6f 74 20 62 65 | 65 6e 20 61 6c 72 65 61 |e not be|en alrea|
|000045a0| 64 79 20 7a 61 70 70 65 | 64 0d 0d 20 20 20 20 43 |dy zappe|d.. C|
|000045b0| 6f 6e 73 74 20 20 20 0d | 20 20 20 20 45 72 72 6f |onst .| Erro|
|000045c0| 72 73 20 20 0d 20 20 20 | 20 46 6c 61 67 73 20 20 |rs . | Flags |
|000045d0| 20 0d 0d 20 20 20 20 47 | 6c 6f 62 61 6c 20 20 0d | .. G|lobal .|
|000045e0| 20 20 20 20 52 73 72 63 | 20 20 20 20 0d 0d 20 20 | Rsrc| .. |
|000045f0| 20 20 56 65 72 73 69 6f | 6e 20 30 30 30 0d 20 20 | Versio|n 000. |
|00004600| 20 20 4e 6f 74 65 73 20 | 20 20 0d 20 20 20 20 48 | Notes | . H|
|00004610| 69 73 74 6f 72 79 0d 20 | 20 20 20 30 30 30 20 47 |istory. | 000 G|
|00004620| 4f 44 20 31 30 2e 30 34 | 2e 39 36 20 53 74 61 72 |OD 10.04|.96 Star|
|00004630| 74 0d 20 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |t. .....|........|
|00004640| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004650| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004660| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 20 2a |........|...... *|
|00004670| 2f 0d 20 20 20 20 45 6e | 74 65 72 43 6f 64 65 52 |/. En|terCodeR|
|00004680| 73 72 63 28 29 3b 0d 20 | 20 20 20 6d 63 4f 62 6a |src();. | mcObj|
|00004690| 53 65 74 28 26 67 72 70 | 2c 20 62 72 70 49 6e 4f |Set(&grp|, brpInO|
|000046a0| 70 65 6e 50 69 63 74 75 | 72 65 29 3b 0d 0d 20 20 |penPictu|re);.. |
|000046b0| 20 20 50 69 63 48 61 6e | 64 6c 65 20 70 69 63 20 | PicHan|dle pic |
|000046c0| 3d 20 43 61 6c 6c 54 72 | 61 70 4f 70 65 6e 50 69 |= CallTr|apOpenPi|
|000046d0| 63 74 75 72 65 28 67 61 | 74 54 72 61 70 73 5b 6b |cture(ga|tTraps[k|
|000046e0| 74 72 4f 70 65 6e 50 69 | 63 74 75 72 65 5d 2c 20 |trOpenPi|cture], |
|000046f0| 62 6f 78 29 3b 0d 0d 20 | 20 20 20 6d 63 4f 62 6a |box);.. | mcObj|
|00004700| 43 6c 72 28 26 67 72 70 | 2c 20 62 72 70 49 6e 4f |Clr(&grp|, brpInO|
|00004710| 70 65 6e 50 69 63 74 75 | 72 65 29 3b 0d 20 20 20 |penPictu|re);. |
|00004720| 20 4c 65 61 76 65 43 6f | 64 65 52 73 72 63 28 29 | LeaveCo|deRsrc()|
|00004730| 3b 0d 0d 20 20 20 20 72 | 65 74 75 72 6e 20 20 70 |;.. r|eturn p|
|00004740| 69 63 3b 0d 20 7d 0d 0d | 0d 2f 2f 20 47 4c 55 45 |ic;. }..|.// GLUE|
|00004750| 20 43 6f 64 65 20 66 6f | 72 20 74 70 4e 65 77 48 | Code fo|r tpNewH|
|00004760| 61 6e 64 6c 65 0d 23 69 | 66 20 20 20 20 20 20 20 |andle.#i|f |
|00004770| 20 20 49 53 41 50 50 43 | 0d 0d 73 74 61 74 69 63 | ISAPPC|..static|
|00004780| 20 52 6f 75 74 69 6e 65 | 44 65 73 63 72 69 70 74 | Routine|Descript|
|00004790| 6f 72 20 78 61 4f 70 65 | 6e 50 69 63 74 75 72 65 |or xaOpe|nPicture|
|000047a0| 20 3d 20 42 55 49 4c 44 | 5f 52 4f 55 54 49 4e 45 | = BUILD|_ROUTINE|
|000047b0| 5f 44 45 53 43 52 49 50 | 54 4f 52 28 62 70 69 4f |_DESCRIP|TOR(bpiO|
|000047c0| 70 65 6e 50 69 63 74 75 | 72 65 2c 20 78 61 4f 70 |penPictu|re, xaOp|
|000047d0| 65 6e 50 69 63 74 75 72 | 65 50 50 43 29 3b 0d 0d |enPictur|ePPC);..|
|000047e0| 73 74 61 74 69 63 20 70 | 61 73 63 61 6c 20 50 69 |static p|ascal Pi|
|000047f0| 63 48 61 6e 64 6c 65 20 | 78 61 4f 70 65 6e 50 69 |cHandle |xaOpenPi|
|00004800| 63 74 75 72 65 50 50 43 | 28 72 65 63 74 20 62 6f |cturePPC|(rect bo|
|00004810| 78 29 0d 20 7b 0d 20 20 | 20 20 72 65 74 75 72 6e |x). {. | return|
|00004820| 20 20 74 70 4f 70 65 6e | 50 69 63 74 75 72 65 58 | tpOpen|PictureX|
|00004830| 28 62 6f 78 29 3b 0d 20 | 7d 0d 0d 23 65 6c 73 65 |(box);. |}..#else|
|00004840| 20 20 20 2f 2f 20 20 49 | 53 41 50 50 43 0d 0d 73 | // I|SAPPC..s|
|00004850| 74 61 74 69 63 20 70 61 | 73 63 61 6c 20 61 73 6d |tatic pa|scal asm|
|00004860| 20 76 6f 69 64 20 78 61 | 4f 70 65 6e 50 69 63 74 | void xa|OpenPict|
|00004870| 75 72 65 28 76 6f 69 64 | 29 0d 20 7b 0d 20 20 20 |ure(void|). {. |
|00004880| 20 6d 6f 76 65 2e 6c 20 | 20 20 20 20 20 34 28 73 | move.l | 4(s|
|00004890| 70 29 2c 20 61 30 20 20 | 20 20 20 20 20 20 20 20 |p), a0 | |
|000048a0| 20 2f 2f 20 42 6f 78 20 | 70 61 72 6d 0d 20 20 20 | // Box |parm. |
|000048b0| 20 6d 6f 76 65 2e 6c 20 | 20 20 20 20 20 28 73 70 | move.l | (sp|
|000048c0| 29 2b 2c 20 28 73 70 29 | 20 20 20 20 20 20 20 20 |)+, (sp)| |
|000048d0| 20 2f 2f 20 4b 69 6c 6c | 20 69 74 0d 20 20 20 20 | // Kill| it. |
|000048e0| 6d 6f 76 65 6d 2e 6c 20 | 20 20 20 20 64 30 2d 64 |movem.l | d0-d|
|000048f0| 32 2f 61 31 2c 20 2d 28 | 73 70 29 0d 20 20 20 20 |2/a1, -(|sp). |
|00004900| 6d 6f 76 65 2e 6c 20 20 | 20 20 20 20 61 30 2c 20 |move.l | a0, |
|00004910| 2d 28 73 70 29 20 20 20 | 20 20 20 20 20 20 20 20 |-(sp) | |
|00004920| 2f 2f 20 42 6f 78 20 70 | 61 72 6d 0d 2f 2f 20 20 |// Box p|arm.// |
|00004930| 5f 44 65 62 75 67 67 65 | 72 0d 20 20 20 20 6a 73 |_Debugge|r. js|
|00004940| 72 20 20 20 20 20 20 20 | 20 20 74 70 4f 70 65 6e |r | tpOpen|
|00004950| 50 69 63 74 75 72 65 58 | 0d 20 20 20 20 61 64 64 |PictureX|. add|
|00004960| 71 2e 77 20 20 20 20 20 | 20 23 34 2c 20 73 70 20 |q.w | #4, sp |
|00004970| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2f 2f 20 | | // |
|00004980| 4b 69 6c 6c 20 62 6f 78 | 20 70 61 72 6d 0d 20 20 |Kill box| parm. |
|00004990| 20 20 6d 6f 76 65 6d 2e | 6c 20 20 20 20 20 28 73 | movem.|l (s|
|000049a0| 70 29 2b 2c 20 64 30 2d | 64 32 2f 61 31 0d 20 20 |p)+, d0-|d2/a1. |
|000049b0| 20 20 6d 6f 76 65 2e 6c | 20 20 20 20 20 20 61 30 | move.l| a0|
|000049c0| 2c 20 34 28 73 70 29 0d | 20 20 20 20 72 74 73 0d |, 4(sp).| rts.|
|000049d0| 20 7d 0d 0d 23 65 6e 64 | 69 66 20 20 2f 2f 20 20 | }..#end|if // |
|000049e0| 49 53 41 50 50 43 0d 0d | 0d 0d 0d 0d 0d 73 74 61 |ISAPPC..|.....sta|
|000049f0| 74 69 63 20 53 79 73 50 | 72 6f 63 20 74 70 4d 61 |tic SysP|roc tpMa|
|00004a00| 78 41 70 70 6c 5a 6f 6e | 65 58 28 76 6f 69 64 29 |xApplZon|eX(void)|
|00004a10| 0d 20 7b 0d 20 2f 2a 20 | d0 d0 d0 d0 d0 d0 d0 d0 |. {. /* |........|
|00004a20| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004a30| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004a40| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004a50| d0 d0 0d 20 20 20 20 74 | 70 20 54 72 61 70 20 4d |... t|p Trap M|
|00004a60| 61 78 41 70 70 6c 5a 6f | 6e 65 58 0d 20 20 20 20 |axApplZo|neX. |
|00004a70| 0d 20 20 20 20 49 6e 20 | 20 20 20 20 20 0d 20 20 |. In | . |
|00004a80| 20 20 4f 75 74 20 20 20 | 20 20 0d 0d 20 20 20 20 | Out | .. |
|00004a90| 45 66 66 65 63 74 20 20 | 52 65 70 6c 61 63 65 20 |Effect |Replace |
|00004aa0| 4e 65 77 48 61 6e 64 6c | 65 20 61 6e 64 20 4e 65 |NewHandl|e and Ne|
|00004ab0| 77 50 74 72 20 77 69 74 | 68 20 6f 75 72 20 76 65 |wPtr wit|h our ve|
|00004ac0| 72 73 69 6f 6e 73 0d 20 | 20 20 20 20 20 20 20 20 |rsions. | |
|00004ad0| 20 20 20 20 69 66 20 74 | 68 65 20 61 70 70 20 69 | if t|he app i|
|00004ae0| 73 20 69 6e 20 6f 75 72 | 20 70 72 65 66 73 20 72 |s in our| prefs r|
|00004af0| 65 73 6f 75 72 63 65 20 | 61 6e 64 20 74 68 65 0d |esource |and the.|
|00004b00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 74 72 61 | | tra|
|00004b10| 70 73 20 68 61 76 65 20 | 6e 6f 74 20 62 65 65 6e |ps have |not been|
|00004b20| 20 61 6c 72 65 61 64 79 | 20 7a 61 70 70 65 64 0d | already| zapped.|
|00004b30| 0d 20 20 20 20 43 6f 6e | 73 74 20 20 20 0d 20 20 |. Con|st . |
|00004b40| 20 20 45 72 72 6f 72 73 | 20 20 0d 20 20 20 20 46 | Errors| . F|
|00004b50| 6c 61 67 73 20 20 20 0d | 0d 20 20 20 20 47 6c 6f |lags .|. Glo|
|00004b60| 62 61 6c 20 20 0d 20 20 | 20 20 52 73 72 63 20 20 |bal . | Rsrc |
|00004b70| 20 20 0d 0d 20 20 20 20 | 56 65 72 73 69 6f 6e 20 | .. |Version |
|00004b80| 30 30 30 0d 20 20 20 20 | 4e 6f 74 65 73 20 20 20 |000. |Notes |
|00004b90| 0d 20 20 20 20 48 69 73 | 74 6f 72 79 0d 20 20 20 |. His|tory. |
|00004ba0| 20 30 30 30 20 47 4f 44 | 20 31 30 2e 30 34 2e 39 | 000 GOD| 10.04.9|
|00004bb0| 36 20 53 74 61 72 74 0d | 20 d0 d0 d0 d0 d0 d0 d0 |6 Start.| .......|
|00004bc0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004bd0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004be0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00004bf0| d0 d0 d0 d0 20 2a 2f 0d | 20 20 20 20 45 6e 74 65 |.... */.| Ente|
|00004c00| 72 43 6f 64 65 52 73 72 | 63 28 29 3b 0d 0d 20 20 |rCodeRsr|c();.. |
|00004c10| 20 20 62 6f 6f 6c 20 20 | 20 20 65 78 70 61 6e 73 | bool | expans|
|00004c20| 69 6f 6e 20 20 20 3d 20 | 46 41 4c 53 45 3b 0d 20 |ion = |FALSE;. |
|00004c30| 20 20 20 62 6f 6f 6c 20 | 20 20 20 73 6d 61 72 74 | bool | smart|
|00004c40| 20 20 20 20 20 20 20 3d | 20 46 41 4c 53 45 3b 0d | =| FALSE;.|
|00004c50| 0d 2f 2f 20 20 6d 63 4f | 62 6a 43 6c 72 28 26 67 |.// mcO|bjClr(&g|
|00004c60| 72 70 2c 20 62 72 70 49 | 73 4c 61 75 6e 63 68 69 |rp, brpI|sLaunchi|
|00004c70| 6e 67 29 3b 20 2f 2f 20 | 43 61 6e 27 74 20 62 65 |ng); // |Can't be|
|00004c80| 20 6c 61 75 6e 63 68 69 | 6e 67 20 6e 6f 77 3f 21 | launchi|ng now?!|
|00004c90| 3f 0d 0d 20 20 20 20 69 | 66 20 28 2a 6f 73 43 75 |?.. i|f (*osCu|
|00004ca0| 72 41 70 4e 61 6d 65 20 | 3c 3d 20 33 31 29 0d 20 |rApName |<= 31). |
|00004cb0| 20 20 20 20 7b 0d 20 20 | 20 20 20 20 20 20 50 72 | {. | Pr|
|00004cc0| 6f 63 65 73 73 53 4e 20 | 20 20 20 20 20 20 20 20 |ocessSN | |
|00004cd0| 20 20 61 70 70 53 4e 3b | 0d 20 20 20 20 20 20 20 | appSN;|. |
|00004ce0| 20 50 72 6f 63 65 73 73 | 49 6e 66 6f 52 65 63 20 | Process|InfoRec |
|00004cf0| 20 20 20 20 20 61 70 70 | 49 6e 66 6f 3b 0d 20 20 | app|Info;. |
|00004d00| 20 20 20 20 20 20 46 53 | 4f 62 6a 4e 61 6d 65 20 | FS|ObjName |
|00004d10| 20 20 20 20 20 20 20 20 | 20 20 61 70 70 4e 61 6d | | appNam|
|00004d20| 65 3b 0d 0d 20 20 20 20 | 20 20 20 20 2f 2f 20 43 |e;.. | // C|
|00004d30| 68 65 63 6b 20 69 66 20 | 77 65 20 61 72 65 20 61 |heck if |we are a|
|00004d40| 6c 6c 6f 77 65 64 20 74 | 6f c9 0d 20 20 20 20 20 |llowed t|o.. |
|00004d50| 20 20 20 61 70 70 49 6e | 66 6f 2e 70 72 6f 63 65 | appIn|fo.proce|
|00004d60| 73 73 49 6e 66 6f 4c 65 | 6e 67 74 68 20 3d 20 73 |ssInfoLe|ngth = s|
|00004d70| 69 7a 65 6f 66 28 61 70 | 70 49 6e 66 6f 29 3b 0d |izeof(ap|pInfo);.|
|00004d80| 20 20 20 20 20 20 20 20 | 61 70 70 49 6e 66 6f 2e | |appInfo.|
|00004d90| 70 72 6f 63 65 73 73 4e | 61 6d 65 20 3d 20 61 70 |processN|ame = ap|
|00004da0| 70 4e 61 6d 65 3b 0d 20 | 20 20 20 20 20 20 20 61 |pName;. | a|
|00004db0| 70 70 49 6e 66 6f 2e 70 | 72 6f 63 65 73 73 41 70 |ppInfo.p|rocessAp|
|00004dc0| 70 53 70 65 63 20 3d 20 | 4e 55 4c 4c 3b 0d 20 20 |pSpec = |NULL;. |
|00004dd0| 20 20 20 20 20 20 61 70 | 70 53 4e 2e 68 69 67 68 | ap|pSN.high|
|00004de0| 4c 6f 6e 67 4f 66 50 53 | 4e 20 3d 20 30 3b 0d 20 |LongOfPS|N = 0;. |
|00004df0| 20 20 20 20 20 20 20 61 | 70 70 53 4e 2e 6c 6f 77 | a|ppSN.low|
|00004e00| 4c 6f 6e 67 4f 66 50 53 | 4e 20 3d 20 6b 43 75 72 |LongOfPS|N = kCur|
|00004e10| 72 65 6e 74 50 72 6f 63 | 65 73 73 3b 0d 20 20 20 |rentProc|ess;. |
|00004e20| 20 20 20 20 20 47 65 74 | 50 72 6f 63 65 73 73 49 | Get|ProcessI|
|00004e30| 6e 66 6f 72 6d 61 74 69 | 6f 6e 28 26 61 70 70 53 |nformati|on(&appS|
|00004e40| 4e 2c 20 26 61 70 70 49 | 6e 66 6f 29 3b 0d 0d 20 |N, &appI|nfo);.. |
|00004e50| 20 20 20 20 20 20 20 69 | 66 20 28 61 70 70 49 74 | i|f (appIt|
|00004e60| 65 6d 20 69 74 65 6d 20 | 3d 20 72 70 46 69 6e 64 |em item |= rpFind|
|00004e70| 41 70 70 28 2a 67 72 70 | 2e 70 72 65 66 73 2c 20 |App(*grp|.prefs, |
|00004e80| 61 70 70 49 6e 66 6f 2e | 70 72 6f 63 65 73 73 53 |appInfo.|processS|
|00004e90| 69 67 6e 61 74 75 72 65 | 2c 0d 20 20 20 20 20 20 |ignature|,. |
|00004ea0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004ec0| 20 20 61 70 70 4e 61 6d | 65 2c 20 54 52 55 45 2c | appNam|e, TRUE,|
|00004ed0| 20 4e 55 4c 4c 2c 20 4e | 55 4c 4c 29 29 0d 20 20 | NULL, N|ULL)). |
|00004ee0| 20 20 20 20 20 20 20 7b | 0d 20 20 20 20 20 20 20 | {|. |
|00004ef0| 20 20 20 20 20 65 78 70 | 61 6e 73 69 6f 6e 20 20 | exp|ansion |
|00004f00| 20 3d 20 6d 63 4f 62 6a | 42 6f 6f 6c 28 69 74 65 | = mcObj|Bool(ite|
|00004f10| 6d 2c 20 62 62 61 45 78 | 70 61 6e 64 29 3b 0d 20 |m, bbaEx|pand);. |
|00004f20| 20 20 20 20 20 20 20 20 | 20 20 20 73 6d 61 72 74 | | smart|
|00004f30| 20 20 20 20 20 20 20 3d | 20 6d 63 4f 62 6a 42 6f | =| mcObjBo|
|00004f40| 6f 6c 28 69 74 65 6d 2c | 20 62 62 61 53 6d 61 72 |ol(item,| bbaSmar|
|00004f50| 74 48 65 61 70 29 3b 0d | 20 20 20 20 20 20 20 20 |tHeap);.| |
|00004f60| 20 7d 0d 0d 2f 2a 0d 20 | 20 20 20 20 20 20 20 79 | }../*. | y|
|00004f70| 45 72 72 6f 72 20 20 65 | 72 72 3b 0d 0d 20 20 20 |Error e|rr;.. |
|00004f80| 20 20 20 20 20 69 66 20 | 28 31 29 0d 20 20 20 20 | if |(1). |
|00004f90| 20 20 20 20 20 20 20 20 | 67 72 70 2e 74 6d 70 5a | |grp.tmpZ|
|00004fa0| 6f 6e 65 20 3d 20 6f 73 | 54 77 69 74 63 68 5a 6f |one = os|TwitchZo|
|00004fb0| 6e 65 3b 0d 20 20 20 20 | 20 20 20 20 65 6c 73 65 |ne;. | else|
|00004fc0| 20 69 66 20 28 48 61 6e | 64 6c 65 20 63 72 61 70 | if (Han|dle crap|
|00004fd0| 20 3d 20 54 65 6d 70 4e | 65 77 48 61 6e 64 6c 65 | = TempN|ewHandle|
|00004fe0| 28 33 2c 20 26 65 72 72 | 29 29 0d 20 20 20 20 20 |(3, &err|)). |
|00004ff0| 20 20 20 20 7b 0d 20 20 | 20 20 20 20 20 20 20 20 | {. | |
|00005000| 20 20 67 72 70 2e 74 6d | 70 5a 6f 6e 65 20 3d 20 | grp.tm|pZone = |
|00005010| 48 61 6e 64 6c 65 5a 6f | 6e 65 28 63 72 61 70 29 |HandleZo|ne(crap)|
|00005020| 3b 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 6d 6d |;. | mm|
|00005030| 48 64 6c 44 65 6c 28 63 | 72 61 70 29 3b 0d 20 20 |HdlDel(c|rap);. |
|00005040| 20 20 20 20 20 20 20 7d | 0d 2a 2f 20 20 20 7d 0d | }|.*/ }.|
|00005050| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 7b 0d | else|. {.|
|00005060| 20 20 20 20 20 20 20 20 | 2f 2f 20 52 65 67 65 74 | |// Reget|
|00005070| 20 74 72 61 70 20 69 6e | 66 6f 0d 20 20 20 20 20 | trap in|fo. |
|00005080| 20 20 20 67 61 74 54 72 | 61 70 73 5b 6b 74 72 4f | gatTr|aps[ktrO|
|00005090| 70 65 6e 50 69 63 74 75 | 72 65 5d 20 20 20 20 3d |penPictu|re] =|
|000050a0| 20 6f 73 54 72 61 70 53 | 77 61 70 28 5f 4f 70 65 | osTrapS|wap(_Ope|
|000050b0| 6e 50 69 63 74 75 72 65 | 2c 20 4e 55 4c 4c 29 3b |nPicture|, NULL);|
|000050c0| 0d 20 20 20 20 20 20 20 | 20 67 61 74 54 72 61 70 |. | gatTrap|
|000050d0| 73 5b 6b 74 72 4e 65 77 | 48 61 6e 64 6c 65 5d 20 |s[ktrNew|Handle] |
|000050e0| 20 20 20 20 20 3d 20 6f | 73 54 72 61 70 53 77 61 | = o|sTrapSwa|
|000050f0| 70 28 5f 4e 65 77 48 61 | 6e 64 6c 65 2c 20 4e 55 |p(_NewHa|ndle, NU|
|00005100| 4c 4c 29 3b 0d 20 20 20 | 20 20 20 20 20 67 61 74 |LL);. | gat|
|00005110| 54 72 61 70 73 5b 6b 74 | 72 4e 65 77 50 74 72 5d |Traps[kt|rNewPtr]|
|00005120| 20 20 20 20 20 20 20 20 | 20 3d 20 6f 73 54 72 61 | | = osTra|
|00005130| 70 53 77 61 70 28 5f 4e | 65 77 50 74 72 2c 20 4e |pSwap(_N|ewPtr, N|
|00005140| 55 4c 4c 29 3b 0d 20 20 | 20 20 20 20 20 20 67 61 |ULL);. | ga|
|00005150| 74 54 72 61 70 73 5b 6b | 74 72 44 69 73 70 6f 73 |tTraps[k|trDispos|
|00005160| 65 50 74 72 5d 20 20 20 | 20 20 3d 20 6f 73 54 72 |ePtr] | = osTr|
|00005170| 61 70 53 77 61 70 28 5f | 44 69 73 70 6f 73 65 50 |apSwap(_|DisposeP|
|00005180| 74 72 2c 20 4e 55 4c 4c | 29 3b 0d 20 20 20 20 20 |tr, NULL|);. |
|00005190| 7d 0d 0d 20 20 20 20 69 | 66 20 28 28 65 78 70 61 |}.. i|f ((expa|
|000051a0| 6e 73 69 6f 6e 20 7c 7c | 20 73 6d 61 72 74 29 20 |nsion ||| smart) |
|000051b0| 26 26 20 28 6f 73 54 72 | 61 70 53 77 61 70 28 5f |&& (osTr|apSwap(_|
|000051c0| 4e 65 77 48 61 6e 64 6c | 65 2c 20 4e 55 4c 4c 29 |NewHandl|e, NULL)|
|000051d0| 20 21 3d 20 28 73 6d 61 | 72 74 20 3f 20 26 78 61 | != (sma|rt ? &xa|
|000051e0| 4e 65 77 48 61 6e 64 6c | 65 53 6d 61 72 74 20 3a |NewHandl|eSmart :|
|000051f0| 20 26 78 61 4e 65 77 48 | 61 6e 64 6c 65 29 29 29 | &xaNewH|andle)))|
|00005200| 0d 20 20 20 20 20 7b 0d | 20 20 20 20 20 20 20 20 |. {.| |
|00005210| 2f 2f 20 52 65 70 6c 61 | 63 65 20 74 68 65 20 74 |// Repla|ce the t|
|00005220| 72 61 70 73 0d 20 20 20 | 20 20 20 20 20 69 66 20 |raps. | if |
|00005230| 28 6f 73 54 72 61 70 53 | 77 61 70 28 5f 4e 65 77 |(osTrapS|wap(_New|
|00005240| 48 61 6e 64 6c 65 2c 20 | 73 6d 61 72 74 20 3f 20 |Handle, |smart ? |
|00005250| 26 78 61 4e 65 77 48 61 | 6e 64 6c 65 53 6d 61 72 |&xaNewHa|ndleSmar|
|00005260| 74 20 3a 20 26 78 61 4e | 65 77 48 61 6e 64 6c 65 |t : &xaN|ewHandle|
|00005270| 29 20 21 3d 20 67 61 74 | 54 72 61 70 73 5b 6b 74 |) != gat|Traps[kt|
|00005280| 72 4e 65 77 48 61 6e 64 | 6c 65 5d 29 0d 20 20 20 |rNewHand|le]). |
|00005290| 20 20 20 20 20 20 7b 0d | 2f 2f 20 20 20 20 20 20 | {.|// |
|000052a0| 20 20 20 20 44 65 62 75 | 67 67 65 72 28 29 3b 0d | Debu|gger();.|
|000052b0| 2f 2f 20 20 20 20 20 20 | 20 20 20 20 6f 73 54 72 |// | osTr|
|000052c0| 61 70 53 77 61 70 28 5f | 4e 65 77 48 61 6e 64 6c |apSwap(_|NewHandl|
|000052d0| 65 2c 20 6f 72 69 67 69 | 6e 61 6c 29 3b 0d 2f 2f |e, origi|nal);.//|
|000052e0| 20 20 20 20 20 20 20 20 | 20 20 53 79 73 42 65 65 | | SysBee|
|000052f0| 70 28 39 29 3b 0d 20 20 | 20 20 20 20 20 20 20 7d |p(9);. | }|
|00005300| 0d 0d 20 20 20 20 20 20 | 20 20 69 66 20 28 65 78 |.. | if (ex|
|00005310| 70 61 6e 73 69 6f 6e 29 | 0d 20 20 20 20 20 20 20 |pansion)|. |
|00005320| 20 20 7b 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 | {. | |
|00005330| 69 66 20 28 6f 73 54 72 | 61 70 53 77 61 70 28 5f |if (osTr|apSwap(_|
|00005340| 4e 65 77 50 74 72 2c 20 | 26 78 61 4e 65 77 50 74 |NewPtr, |&xaNewPt|
|00005350| 72 29 20 21 3d 20 67 61 | 74 54 72 61 70 73 5b 6b |r) != ga|tTraps[k|
|00005360| 74 72 4e 65 77 50 74 72 | 5d 29 0d 20 20 20 20 20 |trNewPtr|]). |
|00005370| 20 20 20 20 20 20 20 20 | 7b 0d 2f 2f 20 20 20 20 | |{.// |
|00005380| 20 20 20 20 20 20 20 20 | 20 20 44 65 62 75 67 67 | | Debugg|
|00005390| 65 72 28 29 3b 0d 2f 2f | 20 20 20 20 20 20 20 20 |er();.//| |
|000053a0| 20 20 20 20 20 20 6f 73 | 54 72 61 70 53 77 61 70 | os|TrapSwap|
|000053b0| 28 5f 4e 65 77 50 74 72 | 2c 20 6f 72 69 67 69 6e |(_NewPtr|, origin|
|000053c0| 61 6c 29 3b 0d 2f 2f 20 | 20 20 20 20 20 20 20 20 |al);.// | |
|000053d0| 20 20 20 20 20 53 79 73 | 42 65 65 70 28 39 29 3b | Sys|Beep(9);|
|000053e0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 7d 0d |. | }.|
|000053f0| 20 20 20 20 20 20 20 20 | 0d 20 20 20 20 20 20 20 | |. |
|00005400| 20 20 20 20 20 69 66 20 | 28 6f 73 54 72 61 70 53 | if |(osTrapS|
|00005410| 77 61 70 28 5f 44 69 73 | 70 6f 73 65 50 74 72 2c |wap(_Dis|posePtr,|
|00005420| 20 26 78 61 44 69 73 70 | 6f 73 65 50 74 72 29 20 | &xaDisp|osePtr) |
|00005430| 21 3d 20 67 61 74 54 72 | 61 70 73 5b 6b 74 72 44 |!= gatTr|aps[ktrD|
|00005440| 69 73 70 6f 73 65 50 74 | 72 5d 29 0d 20 20 20 20 |isposePt|r]). |
|00005450| 20 20 20 20 20 20 20 20 | 20 7b 0d 2f 2f 20 20 20 | | {.// |
|00005460| 20 20 20 20 20 20 20 20 | 20 20 20 44 65 62 75 67 | | Debug|
|00005470| 67 65 72 28 29 3b 0d 2f | 2f 20 20 20 20 20 20 20 |ger();./|/ |
|00005480| 20 20 20 20 20 20 20 6f | 73 54 72 61 70 53 77 61 | o|sTrapSwa|
|00005490| 70 28 5f 44 69 73 70 6f | 73 65 50 74 72 2c 20 6f |p(_Dispo|sePtr, o|
|000054a0| 72 69 67 69 6e 61 6c 29 | 3b 0d 2f 2f 20 20 20 20 |riginal)|;.// |
|000054b0| 20 20 20 20 20 20 20 20 | 20 20 53 79 73 42 65 65 | | SysBee|
|000054c0| 70 28 39 29 3b 0d 20 20 | 20 20 20 20 20 20 20 20 |p(9);. | |
|000054d0| 20 20 20 7d 0d 20 20 20 | 20 20 20 20 20 20 7d 0d | }. | }.|
|000054e0| 20 20 20 20 20 20 20 20 | 0d 20 20 20 20 20 20 20 | |. |
|000054f0| 20 69 66 20 28 73 6d 61 | 72 74 29 0d 20 20 20 20 | if (sma|rt). |
|00005500| 20 20 20 20 20 7b 0d 20 | 20 20 20 20 20 20 20 20 | {. | |
|00005510| 20 20 20 69 66 20 28 6f | 73 54 72 61 70 53 77 61 | if (o|sTrapSwa|
|00005520| 70 28 5f 4f 70 65 6e 50 | 69 63 74 75 72 65 2c 20 |p(_OpenP|icture, |
|00005530| 26 78 61 4f 70 65 6e 50 | 69 63 74 75 72 65 29 20 |&xaOpenP|icture) |
|00005540| 21 3d 20 67 61 74 54 72 | 61 70 73 5b 6b 74 72 4f |!= gatTr|aps[ktrO|
|00005550| 70 65 6e 50 69 63 74 75 | 72 65 5d 29 0d 20 20 20 |penPictu|re]). |
|00005560| 20 20 20 20 20 20 20 20 | 20 20 7b 0d 2f 2f 20 20 | | {.// |
|00005570| 20 20 20 20 20 20 20 20 | 20 20 20 20 44 65 62 75 | | Debu|
|00005580| 67 67 65 72 28 29 3b 0d | 2f 2f 20 20 20 20 20 20 |gger();.|// |
|00005590| 20 20 20 20 20 20 20 20 | 6f 73 54 72 61 70 53 77 | |osTrapSw|
|000055a0| 61 70 28 5f 44 69 73 70 | 6f 73 65 50 74 72 2c 20 |ap(_Disp|osePtr, |
|000055b0| 6f 72 69 67 69 6e 61 6c | 29 3b 0d 2f 2f 20 20 20 |original|);.// |
|000055c0| 20 20 20 20 20 20 20 20 | 20 20 20 53 79 73 42 65 | | SysBe|
|000055d0| 65 70 28 39 29 3b 0d 20 | 20 20 20 20 20 20 20 20 |ep(9);. | |
|000055e0| 20 20 20 20 7d 0d 20 20 | 20 20 20 20 20 20 20 7d | }. | }|
|000055f0| 0d 20 20 20 20 20 7d 0d | 0d 20 20 20 20 53 79 73 |. }.|. Sys|
|00005600| 50 72 6f 63 20 74 72 61 | 70 20 3d 20 67 61 74 54 |Proc tra|p = gatT|
|00005610| 72 61 70 73 5b 6b 74 72 | 4d 61 78 41 70 70 6c 5a |raps[ktr|MaxApplZ|
|00005620| 6f 6e 65 5d 3b 0d 0d 20 | 20 20 20 4c 65 61 76 65 |one];.. | Leave|
|00005630| 43 6f 64 65 52 73 72 63 | 28 29 3b 0d 0d 20 20 20 |CodeRsrc|();.. |
|00005640| 20 72 65 74 75 72 6e 20 | 20 74 72 61 70 3b 0d 20 | return | trap;. |
|00005650| 7d 0d 0d 0d 2f 2f 20 47 | 4c 55 45 20 43 6f 64 65 |}...// G|LUE Code|
|00005660| 20 66 6f 72 20 74 70 4e | 65 77 48 61 6e 64 6c 65 | for tpN|ewHandle|
|00005670| 0d 23 69 66 20 20 20 20 | 20 20 20 20 20 49 53 41 |.#if | ISA|
|00005680| 50 50 43 0d 0d 73 74 61 | 74 69 63 20 52 6f 75 74 |PPC..sta|tic Rout|
|00005690| 69 6e 65 44 65 73 63 72 | 69 70 74 6f 72 20 78 61 |ineDescr|iptor xa|
|000056a0| 4d 61 78 41 70 70 6c 5a | 6f 6e 65 20 3d 20 42 55 |MaxApplZ|one = BU|
|000056b0| 49 4c 44 5f 52 4f 55 54 | 49 4e 45 5f 44 45 53 43 |ILD_ROUT|INE_DESC|
|000056c0| 52 49 50 54 4f 52 28 62 | 70 69 4d 61 78 41 70 70 |RIPTOR(b|piMaxApp|
|000056d0| 6c 5a 6f 6e 65 2c 20 78 | 61 4d 61 78 41 70 70 6c |lZone, x|aMaxAppl|
|000056e0| 5a 6f 6e 65 50 50 43 29 | 3b 0d 0d 73 74 61 74 69 |ZonePPC)|;..stati|
|000056f0| 63 20 70 61 73 63 61 6c | 20 76 6f 69 64 20 78 61 |c pascal| void xa|
|00005700| 4d 61 78 41 70 70 6c 5a | 6f 6e 65 50 50 43 28 76 |MaxApplZ|onePPC(v|
|00005710| 6f 69 64 29 0d 20 7b 0d | 20 20 20 20 43 61 6c 6c |oid). {.| Call|
|00005720| 4f 53 54 72 61 70 55 6e | 69 76 65 72 73 61 6c 50 |OSTrapUn|iversalP|
|00005730| 72 6f 63 28 74 70 4d 61 | 78 41 70 70 6c 5a 6f 6e |roc(tpMa|xApplZon|
|00005740| 65 58 28 29 2c 20 62 70 | 69 4d 61 78 41 70 70 6c |eX(), bp|iMaxAppl|
|00005750| 5a 6f 6e 65 29 3b 0d 20 | 7d 0d 0d 23 65 6c 73 65 |Zone);. |}..#else|
|00005760| 20 20 20 2f 2f 20 20 49 | 53 41 50 50 43 0d 0d 73 | // I|SAPPC..s|
|00005770| 74 61 74 69 63 20 70 61 | 73 63 61 6c 20 61 73 6d |tatic pa|scal asm|
|00005780| 20 76 6f 69 64 20 78 61 | 4d 61 78 41 70 70 6c 5a | void xa|MaxApplZ|
|00005790| 6f 6e 65 28 76 6f 69 64 | 29 0d 20 7b 0d 20 20 20 |one(void|). {. |
|000057a0| 20 6d 6f 76 65 6d 2e 6c | 20 20 20 20 20 64 30 2d | movem.l| d0-|
|000057b0| 64 32 2f 61 31 2c 20 2d | 28 73 70 29 0d 20 20 20 |d2/a1, -|(sp). |
|000057c0| 20 6a 73 72 20 20 20 20 | 20 20 20 20 20 74 70 4d | jsr | tpM|
|000057d0| 61 78 41 70 70 6c 5a 6f | 6e 65 58 0d 20 20 20 20 |axApplZo|neX. |
|000057e0| 6d 6f 76 65 6d 2e 6c 20 | 20 20 20 20 28 73 70 29 |movem.l | (sp)|
|000057f0| 2b 2c 20 64 30 2d 64 32 | 2f 61 31 0d 20 20 20 20 |+, d0-d2|/a1. |
|00005800| 6a 6d 70 20 20 20 20 20 | 20 20 20 20 28 61 30 29 |jmp | (a0)|
|00005810| 0d 20 7d 0d 0d 23 65 6e | 64 69 66 20 20 2f 2f 20 |. }..#en|dif // |
|00005820| 20 49 53 41 50 50 43 0d | 0d 0d 0d 0d 0d 79 45 72 | ISAPPC.|.....yEr|
|00005830| 72 6f 72 20 74 70 49 6e | 69 74 28 69 6e 69 74 42 |ror tpIn|it(initB|
|00005840| 6c 6b 20 69 6e 69 74 29 | 0d 20 7b 0d 20 2f 2a 20 |lk init)|. {. /* |
|00005850| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00005860| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00005870| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|00005880| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 0d 20 20 20 20 74 |........|... t|
|00005890| 70 20 20 20 20 20 20 49 | 6e 69 74 0d 0d 20 20 20 |p I|nit.. |
|000058a0| 20 49 6e 20 20 20 20 20 | 20 49 6e 69 74 42 6c 6b | In | InitBlk|
|000058b0| 20 66 72 6f 6d 20 6d 61 | 69 6e 0d 20 20 20 20 4f | from ma|in. O|
|000058c0| 75 74 20 20 20 20 20 0d | 0d 20 20 20 20 45 66 66 |ut .|. Eff|
|000058d0| 65 63 74 20 20 46 69 6c | 6c 20 69 6e 69 74 42 6c |ect Fil|l initBl|
|000058e0| 6b 20 77 69 74 68 20 6f | 75 72 20 73 68 69 74 21 |k with o|ur shit!|
|000058f0| 0d 0d 20 20 20 20 43 6f | 6e 73 74 20 20 20 0d 20 |.. Co|nst . |
|00005900| 20 20 20 45 72 72 6f 72 | 73 20 20 0d 20 20 20 20 | Error|s . |
|00005910| 46 6c 61 67 73 20 20 20 | 0d 20 20 20 20 47 6c 6f |Flags |. Glo|
|00005920| 62 61 6c 20 20 0d 20 20 | 20 20 52 73 72 63 20 20 |bal . | Rsrc |
|00005930| 20 20 0d 0d 20 20 20 20 | 56 65 72 73 69 6f 6e 20 | .. |Version |
|00005940| 30 30 31 0d 20 20 20 20 | 4e 6f 74 65 73 20 20 20 |001. |Notes |
|00005950| 0d 20 20 20 20 48 69 73 | 74 6f 72 79 0d 20 20 20 |. His|tory. |
|00005960| 20 30 30 31 20 47 4f 44 | 20 31 30 2e 30 34 2e 39 | 001 GOD| 10.04.9|
|00005970| 36 20 55 73 65 20 4d 61 | 78 41 70 70 6c 5a 6f 6e |6 Use Ma|xApplZon|
|00005980| 65 0d 20 20 20 20 30 30 | 30 20 0d 20 d0 d0 d0 d0 |e. 00|0 . ....|
|00005990| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000059a0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000059b0| d0 d0 d0 d0 d0 d0 d0 d0 | d0 d0 d0 d0 d0 d0 d0 d0 |........|........|
|000059c0| d0 d0 d0 d0 d0 d0 d0 20 | 2a 2f 0d 20 20 20 20 74 |....... |*/. t|
|000059d0| 72 61 70 54 61 62 6c 65 | 20 20 20 20 20 20 20 20 |rapTable| |
|000059e0| 20 20 20 20 20 20 20 74 | 72 61 70 73 3b 0d 0d 0d | t|raps;...|
|000059f0| 20 20 20 20 2f 2f 20 4f | 75 72 20 54 72 61 70 20 | // O|ur Trap |
|00005a00| 54 61 62 6c 65 0d 20 20 | 20 20 69 6e 69 74 2d 3e |Table. | init->|
|00005a10| 74 72 61 70 73 20 3d 20 | 74 72 61 70 73 20 3d 20 |traps = |traps = |
|00005a20| 28 74 72 61 70 54 61 62 | 6c 65 29 4e 65 77 50 74 |(trapTab|le)NewPt|
|00005a30| 72 53 79 73 43 6c 65 61 | 72 28 73 69 7a 65 6f 66 |rSysClea|r(sizeof|
|00005a40| 28 54 72 61 70 54 61 62 | 6c 65 29 20 2b 20 28 73 |(TrapTab|le) + (s|
|00005a50| 69 7a 65 6f 66 28 54 72 | 61 70 54 61 62 6c 65 49 |izeof(Tr|apTableI|
|00005a60| 74 65 6d 29 20 2a 20 28 | 6b 74 72 43 6e 74 20 2d |tem) * (|ktrCnt -|
|00005a70| 20 31 29 29 29 3b 0d 0d | 20 20 20 20 69 66 20 28 | 1)));..| if (|
|00005a80| 21 74 72 61 70 73 29 0d | 20 20 20 20 20 20 20 20 |!traps).| |
|00005a90| 72 65 74 75 72 6e 20 20 | 6d 65 6d 46 75 6c 6c 45 |return |memFullE|
|00005aa0| 72 72 3b 0d 0d 20 20 20 | 20 74 72 61 70 73 2d 3e |rr;.. | traps->|
|00005ab0| 6f 72 69 67 69 6e 61 6c | 54 72 61 70 73 20 3d 20 |original|Traps = |
|00005ac0| 67 61 74 54 72 61 70 73 | 3b 0d 0d 20 20 20 20 2f |gatTraps|;.. /|
|00005ad0| 2f 20 54 68 65 20 74 72 | 61 70 73 20 77 65 20 70 |/ The tr|aps we p|
|00005ae0| 61 74 63 68 0d 20 20 20 | 20 69 6e 74 20 20 20 20 |atch. | int |
|00005af0| 20 20 20 20 20 20 20 20 | 20 63 6e 74 20 3d 20 31 | | cnt = 1|
|00005b00| 3b 0d 20 20 20 20 74 72 | 61 70 54 61 62 6c 65 49 |;. tr|apTableI|
|00005b10| 74 65 6d 20 20 20 74 20 | 20 20 3d 20 74 72 61 70 |tem t | = trap|
|00005b20| 73 2d 3e 69 74 65 6d 3b | 0d 0d 20 20 20 20 74 2d |s->item;|.. t-|
|00005b30| 3e 74 72 61 70 57 6f 72 | 64 20 3d 20 5f 4c 61 75 |>trapWor|d = _Lau|
|00005b40| 6e 63 68 3b 0d 20 20 20 | 20 74 2d 3e 61 67 74 20 |nch;. | t->agt |
|00005b50| 20 20 20 20 20 3d 20 26 | 78 61 4c 61 75 6e 63 68 | = &|xaLaunch|
|00005b60| 3b 0d 0d 20 20 20 20 2b | 2b 20 63 6e 74 3b 0d 20 |;.. +|+ cnt;. |
|00005b70| 20 20 20 2b 2b 74 3b 0d | 20 20 20 20 74 2d 3e 74 | ++t;.| t->t|
|00005b80| 72 61 70 57 6f 72 64 20 | 3d 20 5f 47 65 74 31 52 |rapWord |= _Get1R|
|00005b90| 65 73 6f 75 72 63 65 3b | 0d 20 20 20 20 74 2d 3e |esource;|. t->|
|00005ba0| 61 67 74 20 20 20 20 20 | 20 3d 20 26 78 61 47 65 |agt | = &xaGe|
|00005bb0| 74 31 52 65 73 6f 75 72 | 63 65 3b 0d 0d 20 20 20 |t1Resour|ce;.. |
|00005bc0| 20 2b 2b 20 63 6e 74 3b | 0d 20 20 20 20 2b 2b 74 | ++ cnt;|. ++t|
|00005bd0| 3b 0d 20 20 20 20 74 2d | 3e 74 72 61 70 57 6f 72 |;. t-|>trapWor|
|00005be0| 64 20 3d 20 5f 4d 61 78 | 41 70 70 6c 5a 6f 6e 65 |d = _Max|ApplZone|
|00005bf0| 3b 0d 20 20 20 20 74 2d | 3e 61 67 74 20 20 20 20 |;. t-|>agt |
|00005c00| 20 20 3d 20 26 78 61 4d | 61 78 41 70 70 6c 5a 6f | = &xaM|axApplZo|
|00005c10| 6e 65 3b 0d 0d 20 20 20 | 20 2f 2f 20 4a 75 73 74 |ne;.. | // Just|
|00005c20| 20 66 6f 72 20 69 6e 71 | 75 69 72 79 0d 20 20 20 | for inq|uiry. |
|00005c30| 20 2b 2b 20 63 6e 74 3b | 0d 20 20 20 20 2b 2b 20 | ++ cnt;|. ++ |
|00005c40| 74 3b 0d 20 20 20 20 74 | 2d 3e 74 72 61 70 57 6f |t;. t|->trapWo|
|00005c50| 72 64 20 3d 20 5f 4f 70 | 65 6e 50 69 63 74 75 72 |rd = _Op|enPictur|
|00005c60| 65 3b 0d 0d 20 20 20 20 | 2b 2b 20 63 6e 74 3b 0d |e;.. |++ cnt;.|
|00005c70| 20 20 20 20 2b 2b 20 74 | 3b 0d 20 20 20 20 74 2d | ++ t|;. t-|
|00005c80| 3e 74 72 61 70 57 6f 72 | 64 20 3d 20 5f 4e 65 77 |>trapWor|d = _New|
|00005c90| 48 61 6e 64 6c 65 3b 0d | 0d 20 20 20 20 2b 2b 20 |Handle;.|. ++ |
|00005ca0| 63 6e 74 3b 0d 20 20 20 | 20 2b 2b 20 74 3b 0d 20 |cnt;. | ++ t;. |
|00005cb0| 20 20 20 74 2d 3e 74 72 | 61 70 57 6f 72 64 20 3d | t->tr|apWord =|
|00005cc0| 20 5f 4e 65 77 50 74 72 | 3b 0d 0d 20 20 20 20 2b | _NewPtr|;.. +|
|00005cd0| 2b 20 63 6e 74 3b 0d 20 | 20 20 20 2b 2b 20 74 3b |+ cnt;. | ++ t;|
|00005ce0| 0d 20 20 20 20 74 2d 3e | 74 72 61 70 57 6f 72 64 |. t->|trapWord|
|00005cf0| 20 3d 20 5f 44 69 73 70 | 6f 73 65 50 74 72 3b 0d | = _Disp|osePtr;.|
|00005d00| 0d 20 20 20 20 2f 2f 20 | 4f 75 72 20 67 65 73 74 |. // |Our gest|
|00005d10| 61 6c 74 73 0d 20 20 20 | 20 69 66 20 28 69 6e 69 |alts. | if (ini|
|00005d20| 74 2d 3e 67 65 73 74 56 | 61 6c 73 29 0d 20 20 20 |t->gestV|als). |
|00005d30| 20 20 20 20 20 69 6e 69 | 74 2d 3e 67 65 73 74 56 | ini|t->gestV|
|00005d40| 61 6c 73 2d 3e 69 74 65 | 6d 5b 30 5d 2e 76 61 6c |als->ite|m[0].val|
|00005d50| 75 65 20 3d 20 28 6c 6f | 6e 67 29 26 67 72 70 3b |ue = (lo|ng)&grp;|
|00005d60| 0d 0d 20 20 20 20 2f 2f | 20 53 65 74 20 74 68 65 |.. //| Set the|
|00005d70| 20 6e 75 6d 62 65 72 20 | 6f 66 20 74 72 61 70 73 | number |of traps|
|00005d80| 20 77 65 20 77 61 6e 74 | 0d 20 20 20 20 74 72 61 | we want|. tra|
|00005d90| 70 73 2d 3e 63 6e 74 20 | 3d 20 63 6e 74 3b 0d 0d |ps->cnt |= cnt;..|
|00005da0| 20 20 20 20 72 65 74 75 | 72 6e 20 20 6e 6f 45 72 | retu|rn noEr|
|00005db0| 72 3b 0d 20 7d 0d 0d 0d | 0d 23 69 6e 63 6c 75 64 |r;. }...|.#includ|
|00005dc0| 65 20 20 20 20 22 6d 6d | 42 6c 6b 43 6c 72 2e 63 |e "mm|BlkClr.c|
|00005dd0| 22 0d 23 69 6e 63 6c 75 | 64 65 20 20 20 20 22 6f |".#inclu|de "o|
|00005de0| 73 54 72 61 70 53 77 61 | 70 2e 63 22 0d 00 00 00 |sTrapSwa|p.c"....|
|00005df0| 16 00 01 00 00 00 00 00 | 0b 00 09 00 04 00 00 00 |........|........|
|00005e00| 09 00 00 00 00 00 00 00 | 00 00 28 46 49 53 48 01 |........|..(FISH.|
|00005e10| 00 80 00 00 00 00 01 00 | 00 00 00 00 04 00 04 00 |........|........|
|00005e20| 00 00 00 00 00 00 00 00 | 00 00 20 06 4d 6f 6e 61 |........|.. .Mona|
|00005e30| 63 6f 00 00 00 00 00 00 | 00 00 50 00 00 00 01 00 |co......|..P.....|
|00005e40| 00 00 04 00 00 00 00 00 | 00 00 04 54 45 58 54 00 |........|...TEXT.|
|00005e50| 00 01 00 00 00 00 00 00 | 00 00 00 73 74 79 6c 00 |........|...styl.|
|00005e60| 00 01 00 00 00 00 00 00 | 00 00 00 46 49 53 48 00 |........|...FISH.|
|00005e70| 00 01 00 00 00 00 00 00 | 00 00 00 53 4f 55 50 00 |........|...SOUP.|
|00005e80| 00 01 00 00 00 00 00 00 | 00 00 00 00 00 00 24 00 |........|......$.|
|00005e90| 00 00 05 00 01 04 07 00 | 81 00 b6 01 eb 03 8e 00 |........|........|
|00005ea0| 03 00 00 00 00 01 60 8c | 00 00 00 0e 1d 52 c0 00 |......`.|.....R..|
|00005eb0| 00 00 00 00 00 01 00 00 | 00 5e 61 00 00 5d 61 00 |........|.^a..]a.|
|00005ec0| 00 00 96 0e 30 46 90 63 | 84 00 00 00 1c 00 96 00 |....0F.c|........|
|00005ed0| 05 54 45 58 54 00 00 00 | 32 73 74 79 6c 00 00 00 |.TEXT...|2styl...|
|00005ee0| 3e 46 49 53 48 00 00 00 | 4a 53 4f 55 50 00 00 00 |>FISH...|JSOUP...|
|00005ef0| 56 64 72 61 67 00 00 00 | 62 6b 77 73 74 00 00 00 |Vdrag...|bkwst...|
|00005f00| 6e 01 00 ff ff 00 00 00 | 00 00 00 00 00 01 00 ff |n.......|........|
|00005f10| ff 00 00 5c 9b 00 00 00 | 00 01 00 ff ff 00 00 5c |...\....|.......\|
|00005f20| b5 00 00 00 00 01 00 ff | ff 00 00 5c e1 00 00 00 |........|...\....|
|00005f30| 00 00 80 ff ff 00 00 5c | e5 00 00 00 00 bf 4c ff |.......\|......L.|
|00005f40| ff 00 00 5d 39 01 0d 52 | 94 |...]9..R|. |
+--------+-------------------------+-------------------------+--------+--------+
